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1 n CONTROLE SEU 
*W GRQAMENTO NO IK E 
NE - Um progiama de Renato 
Degiovani para administragao 
de suas despesas doings ticas. 
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OA CAlOJLO PERT EM 
*"^ BASIC - O m^todo PERT 
de organizagao de empresas 
em programa feito por Ademir 
Castilho Piqueira e William 
Noriald Uemara para o 
Sistema 700. 
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*~ Artigo de Orson Voerckel Galvao. 
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■■■ ^ COM O 1? E 2? GRAUS Reportagem 
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^^ Artigo de Newton Duarte Braga Jr. 

CO CP-30q NOVO MEMBRO NA FAMIUA 
^® PROLOGICA 

gQ TV EM MONITOR: COMO ADAPTAR 



Artigo de David Marco Risnilc. 



JANTAR 




nLIMENTO 


PESO 


MABO 


«70 


BROCOLI 


1*0 


BATATA INSL 


■40 


'^SCAOINHA 


110 


JVA 


060 


DLEO 


003 


TOTAL DE CALORIAS: 


345 


TOTAL DO DIA: 1145 





44PROGRAMESUA 

'^ DIETA - Se voce quer 
fazer um regime de calorias 
mas gosta de card^pios 
variados, veja o programa 
que Pedro Luiz Ribeiro 
elaborou para os micros 
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CO UMA EXPERI£nCIA EM 
^^ FAZENDA DE GADO (2) 

O sistema de controle de uma 
fazenda de gado em 
Campinas, descrito por seu 
proprietario, Willem A. Dutilh. 
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de Rui Cesar Torres. 
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• Um Cdngresso 4 sempre um acome- 
cimento especial. AI6m de ser uma 
oportunidade de confraterniza^So, 
exisie um clima proplcio ao fechamen- 
to de bons negdcios, principalmente 
quando o evento ocorre paralelo a uma 
exposiQ$o. 

Isto sem levarmos em conta que as 
Feiras sSo o espago apfopriado para 
uma saud^vel "espionagem", muito 
embora esta geralmente resuma-se ^s 
estrat^gias de Marketing e ao modo de 
apresenta^o. £ multomalso "vouver 
que meu concorrente estS fazendo 
para ter tanta gente em seu estande" 
do que o "vou ver a que meu concor- 
rente temde bom". 

E 6 justamente essa "tanta gente" 
que vislta os estandes que d^ ^s Feiras 
um papel Importan teno processo de in - 
trodu^o da Informitica no meio so- 
cial. Principalmente sepensarmos no V 
Congresso Nacional de InformMica 
que. juntamente com a II Feira Nacional 
de Informitica, ocorreu recentemenie 
em Pernambuco. 

• H4 muito OS membros da comunida- 
de de InformStica do Nordeste expres- 
savam vontade de ter uma part icipagSo 
mais efeiiva a nivel nacional, nSo s6 
com relagSo as decisOes polltlcas mas 



tamb^m no seniido de garantir um 
maior suporte que viabilizasse o desen- 
volvimenio do mercado naquela re- 
giSo. 

O que se viu neste Congresso, atra- 
vds do publico presente aeleea Feira, 
foique esse Interesse ultrapassou os li- 
mites da comunidade especifica: to- 
dos, estudanies, emprescirios. usu^rlos 
e curiosos.desejam maior acesso ao as- 
sumo. 

• Realmente, assim como a maior par- 
te dos selores da atividade produtiva, 
tamb§m o mercado da IniormMica 
concentra-se na regiSo sudeste. E isto 
nSo seria uma realidade alarmante caso 
tiv^ssemos, em nossa economia, me- 
canismos eficientes que garantlssem o 
repasse do desenvoMmento e dos be- 
neflcios da produgSo ao pals como um 
todo. 

Em verdade isto nSo acontece. E es- 
sa questSo foibasianie debatida duran- 
te Congressso. Desde criticas ao 
atendimento dos fabricantes (segundo 
muitos, OS servigos de assistencia tic- 
nica e suporte de treinamento deixam a 
desejar) ati umaproposta de "boicote" 
aos equipamentos dos grandes fabri- 
cantes, passando a regiao a fabric6-los 
("fazer um micro 4 f^cll", dizia um pa- 



lesirante), p debate foi s4rio, embora 
por vezes resseniindo-se da ausencia 
de uma linha mais consensual e prag- 
m^tica. 

SenSo vejamos: daqui a pouco te- 
remos propostas de uma reser/a dentro 
da reserva, o que 4 inadmisslvel. Con- 
tudo nSo podemos tamb4m entender 
que a regiSo sofra. em relaqio aos cen- 
tres produtores mais ativos, um tipo de 
depend6ncia que tanta o pals tern se 
esforqado para evltar na 4rea externa. 

A briga 4 por uma NacSo indepen- 
dentesim, pordm dentro da qualexista. 
entre os estados. uma relacSo de inter- 
dependencia sadia e condulora dos be- 
neflcios do desenvoMmento. Vamos 
esperar que, tamb4m nesse aspecto, 
vejamos perpetuado o rigor e determi- 
nagSo que vim marcando, ultimamen- 
te, a conduQSo geral de nossa Polltica 
de Inform^tica. 
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O sorteado deste mgs, que receberd 
gratuitamente uma assinatura de um 
ano de MICRO SISTEMAS, k Marco 
Antonio Lima da Motta, de Sao Paulo. 



(^ PARA ADILSON E AMOS ^ 



H^ uns meses atr^s quando live pro- 
blemas com a compatibilizapao no Bra- 
si! do ZX81 adquirido em Portugal, f ui 
ajudado pela MS e seus leltores, p>elo 
que expresso meus agradecimentos. 

Agora, i a minha vez de ajudar, pe- 
lo que Ihe pe^o que envie c6pia desta 
carta para Adllson Soneghet Santos, 
do Espi'rito Santo, e para Am6s Morei- 
ra de Oliveira, de Sao Paulo, os quais 
poderei ajudar, pois al^m de ter exem- 
plares de tais revistas, tenho manual do 
ZX81 escrito em Portugues (ed ipao 
que acompanha os ZX81 vendidos em 
Portugal). 

Carlos J. R. Meireles 
Vit6ria-ES 

N6s. da MICRO SISTEMAS, e os 
leitores Adilson e Am6s, agradecemos 
muito sua disposipao de ajudar. Jd re- 
metemos o seu enderepo, Carlos, para 
os dois leitores que nos pediram infor- 
ma^oes sobre o ZX81 na SepSo de Car- 
tas de MS nP 17. Mais uma vez, obri- 
gada. 







MERCADO DE TRABALHO 







Sou formado em Programagao de 
Sistemas pelo Col^gio Brasi'lia SBC. 
Formei-me no final de 82 e at6 agora 
nao consegui arranjar emprego. Creio 
que como eu muitas outras pessoas es- 
t3o encontrando as mesmas dificulda- 
des, ou seja: a falta de experiencia em 
uma empresa, e a falta de oportunida- 
de que nos dao. 

Na escola onde estudei tinha com- 
putador e fiz est^gio 1^. S6 que x\^ hora 
do emprego este est^gio nSo ^ conside- 
rado. As empresas procurara t^cnicos 
que ji tenham vasta experiencia no 
ramo, e n3o dao chance alguma para os 
rec^m-formados na drea. 

Desta maneira nunca conseguiremos 
um emprego, pois se nSo nos dSo chan- 



ce, como poderemos adquirir a expe- 
riencia necess^ria para conseguirmos 
um emprego? A falta de oportunidade 
para novos t6cnicos nesta irea 6 muito 
grande, e ^ na hora de empregar um 
rec6m-formado que o empresdrio tern 
que pensar; este t^cnico sem experien- 
cia hoje serd o grande t^cnico de ama- 
nha. A falta de interesse do emprega- 
dor contribui para a falta de renovapao 
existente em qualquer ^rea. 

Tudo que eu e os rec^m-formados 
desejamos ^ uma oportunidade para 
que possamos mostrar o que aprende- 
mos durante os anos que estudamos. 
Marco Antonio Lima da Motta 
Sao Bernadro do Campo-SP 

Muito bem Antonio, publlcamos o 
seu justo desabafo. Vamos torcer para 
que algu^m reflita sobre sua andlise e 
Ihe dS uma chance. Boa Sorte. 
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OPINIAO 
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Na sepao de cartas do n9 1 8 de M I - 
ORG SISTEMAS, o professor de Li'n- 
gua Portuguesa Gilson Sobral protesta 
contra o uso de expressoes em Ingles 
na ^rea de computapao. Como usuiria 
de computadores de grande porte, gos- 
taria de expor alguns argumentos con- 
tr^rios a esse protesto que, espero, nao 
me qualificarao como xenof ("lica. 

Suponhamos que alguem no Brasil 
se desse ao trabalho de desenvolver 
um compilador que entendesse o SE... 
ENTAO e, indo um pouco alem, que 
fosse aprovada uma lei proibindo o 
uso do IF. ..THEN, Ver-nos-i'amos tra- 
duzindo programas para o BASICO, o 
TRADUFOR (exFORTRAN) etc. 
pois, 1^ que a matem^tica e a logica 
aristot^llca n3o s3o manifesta(;:oes cul- 
turais locals, seria um absurdo redesen- 
volvermos tudo aqui. Esse trabalho de 
tradupao seria relativamente simples ao 
tratarmos um programa de 2 Kbytes; 
um pouco mecanico, talvez, mas... e 
um programinha de 135 Kbytes? Por- 
que em breve haver^ "micros" de 1 Mb 
a prego de banana (nacional),e progra- 
mas correspondentemente mais com- 
plexos para o usudrio "domestico". 

Seria um esforgo infrutffero, sem 
duvida! Jd nSo basta que dois compu- 
tadores americanos de marcas diferen- 
tes nao se entendam? Sk nao basta a 
babel lingui'stica que assola nosso po- 
bre planeta, dificultando o intercam- 
bio entre as napoes? Resta-nos o con- 
solo de que o mundo todo faz compu- 
tatpao em Ingles e que n6s, como bra- 
sileiros, somos mais cultos que os ame- 
ricanos ; q uantos americanos sabem 
que THEN se traduz por ENTAO em 
Portugues? 



No mais, cumprimento MICRO SIS- 
TEMAS pelo excelente trabalho que 
vemdesenvolvendo. 
Lena Rotenberg 
Sao Paulo-SP 
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Durante o ano de 1982 li, de forma 
esporddica, numeros de MICRO SIS- 
TEMAS que obtive em bancas de revis- 
tas. Foi assim que despertou meu inte- 
resse por micro computadores. 

Em fins de Janeiro deste ano resol- 
vi comprar um TK82-C, e, como me- 
dida adicional e indispensdvel, tratei de 
assinar a revista e obter os numeros 
atrasados. tnfelizmente mefaltam tres. 

Armado com o manual do compu- 
tador e com o Curso de Basic publica- 
do em MICRO SISTEMAS, mergulhei 
no mundo da Informdtica. A utilidade 
de MICRO SISTEMAS pode ser medi- 
da pelo progresso que fiz nestes dois 
meses, pois agora estou me atrevendo a 
enviar para sua considerapao duas ver- 
soes de um programa de mlnha auto- 
rJa, para ser publicado, se aprovado. 

Todos n6s, leitores de MICRO SIS- 
TEMAS, somos extremamente gratos 
por dispor de uma revista dessa quali- 
dade, que nos abre o mundo da Infor- 
mafica. acesso de leigos, dos auto- 
didatas, como eu, ao mundo dos com- 
putadores seria extremamente diffcll 
se nao existisse sua revista. Todos n6s, 
leitores assi'duos, somos extremamente 
agradecidos pelo trabalho cuidadoso, 
pelo carinho e capricho com que a re- 
vista 6 elaborada e, sobretudo, confia- 
mos que tal caracterfstica se aperfei- 
goard cada vez mais. Nossos agradeci- 
mentos a toda a equipe que elabora 
MICRO SISTEMAS. 
Dr. Joao Eduardo Irion 
Santa Maria-RS 



Muito obrigada por dividir sua ex- 
periencia conosco. A equipe toda agra- 
dece. Com rela^ao a sua colaboraqao, 
ela estd sendo examinada por nossa 
assessoria. Assim que tivermos uma 
resposta entraremos em contato. 
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ti com prazer que tenho acompa- 
nhado todos os numeros desta exce- 
lente publicagao. Bastante oportuno o 
n9 16, de Janeiro de 83, que ofereceu 
gama de artigos interessantes a todo 
tipo de leitor. 
Fdbio Zicker 
GoiSnia-GO 



Sou assTduo leitor desta maravilho- 
sa revista, que em minha opiniSo deve- 
ria ser quinzenal. Realmente voces 
conseguiram reunir todo um conjunto 
de informapBes sobre micros, lingua- 
gens e cursos numa revista s6. 

Meus parab^ns e que permanepam 
sempre fi^is nese embalo tecno-jorna- 
Ifstico. 

Fernando Antonio B. de Araujo 
Recife-PE 

Gostaria de parabenizd-los pelo cur- 
so de Assembler. Foi uma excelente 
id^ia. 

Sergio Batista 
Sao Bernardo do Campo-SP 

Atrav^s desta vimos transmit ir a 
nossa grande satisfapao com os resulta- 
dos obtidos com a veiculapSo de publi- 
cidade nessa revista, resultados esses 
que estSo fazendo jus d nossa condipao 
de software-house, permitindo esten- 
der as nossas atividades de assessoria, 
consultoria, desenvolvimento e venda 
de microcomputadores n3o s6 no Esta- 
do do Rio de Janeiro, mas em todo o 
territbrio nacional. 
Nasajon Sistemas Com. &Rep. Ltda. 
Rio de Janeiro-RJ 

Hice un viaje em el mes de enero, 
visitando algunas ciudades de Brasil y 
estando en Santos tuve la oportunidad 
de comprar el numero 16 de MICRO 
SISTEMAS, revista que me gust6 mu- 
cho por ia cantidad de datos que ofe- 
rece de todo tipo y por la impresi6n 
de programas en el caso de este nume- 
ro programas referidos a juegos. 
Guillermo A. Duplessis 
Mar Del Plata-Argentina 
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sugestOes 
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MICRO SISTEMAS poderia ser se- 
parada em se^oes, artigos de hardware 
e artigos de software. Esta separapao 
ajudaria a localizar melhor osassuntos 
abordados na revista. Sugiro tamb^m 
que junto aos programas venha anota- 
do a qual m^quinaele ^ compatfvel. 
Uriel Gusm3o Apolonio 
Campinas-SP 

Quero sugerir que os programas se- 
jam impresses em folhas isoladas para 
que possam ser arquivados separados 
da revista. 
Zottan Bergman 
Blumenau-SC 

Realmente MICRO SISTEMAS 
atende ds necessidades de todo!' os en- 
volvidoscom microcomputadores. 



Para ficar mais complete, poderia 
ser elaborado um curso de Ingles T6c- 
nice para ensinar aos usudrios a ler e 
entender textos em ingISs sobre com- 
puta(p3o, programas etc. 
Edmilson A. Furlan 
Santa Barbara D'Oeste-SP 

Estou comegando a minha carreira 
no campo da Informdtica e ja tenho 
v^rios exemplares da revista MICRO 
SISTEMAS, e sei que atrav^s dela 
aprenderei muito mais, pois ^ uma re- 
vista muito interessante e de muito 
bom gosto. Desejo, que a caminhada 
desta revista continue para maior su- 
cesso. 

Gostaria de fazer algumas sugest5es: 
que publiquem um artigo explicando 
como trabalhar com a membria do mi- 
cro (de preferencia equipamento D- 
8000/2 ou Fenix 1 1 ), com um mapa de 
memdria bem completo acompanhan- 
do este artigo. Voo6s deveriam tam- 
b^m falar mais em linguagem de m^- 
quina. 

Voc^s poderiam fazer um concurso 
de programas {utilitirios, jogos, etc.), 
no qual voces seriam osjui'zes e, como 
premio, uma assinatura de MICRO 
SISTEMAS. Por fim, esta revista n§o 
devia ser publicada uma vez por mes e 
sim duas. 

Marcos Antonio de Souza 
Umuarama-PR 

Venho pela presente cumpriment^- 
los pela edipaode MICRO SISTEMAS, 
que muito tem me auxiliado. 

Decidi escrever-lhes expondo o meu 
problema. Na firma onde trabalho 
existe um micro Importado, o TRS-80 
Color Computer, com 32 K da Radio 
Shack. Jd sei fazer alguns programas 
com OS comandos SET (x,y,2) RESET 
(x,4}, mas algo que vi na edig3o de MI- 
CRO SISTEMAS nP 16 me deixou 
muito entusiasmado. Foi no artigo 
"Macetes de Programa?3o", em que foi 
utilizado o comando POKE, PEEK, 
PRlNTMEMetc. 

Como o micro 6 colorldo, e tem a 
necessidade de se acrescentar alguns 
numeros a mais para as cores, n3o dd 
para fazer os jogos contidos na edigao 
e tamb^m seguir os "Macetes". Por is- 
so, gostaria de saber sobre a possibili- 
dade de ser feita uma pesquisa sobre o 
TRS-80 Color Computer da Radio 
Shack, a fim de que seja feita uma edi- 
pao como a do n9 16, por^m tudo pa- 
ra micro TRS-80. 
Rinaldo U. de Alvarenga 
Sao Paulo-SP 

Envte suas sugestoes para MICRO 
SISTEMAS. Elas serSo anotadas em 
nossa pauta e procuraremos, na medi- 
da do possfvel, viabillzd-las. 
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Av. Pres, Vargas, 418 - 16' andar s/501 - 
Tel.: 253-0627 - Rio de Janeiro. flJ 
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PROCESSAMENTO DE DADOS 



FORMAgAO DE PROGRAMADORES 
(COMPLETO) 

Dura^ao: 8 meses 

Horario: 2aa Safeirade 19:00 ds 22K)0h5 

MICROCOMPUTADORES E A 
LINGUAGEM BASIC 

DurafSo: 3 semanas 

Horaiio: 2* a 5^ feira de 19O0 as 22:OOhs 

Tutmas de IS alunos 



AMPLA UTILIZAQAO DO 

IBM-4341 E DO LABORATORIO 

DE MICROCOMPUTADORES 



Visite o CPD-ORT - Diariamente apos 
13K)0 hs - R. Dona Mariana. 213-Botafogo 
Rio de Janeiro - Tels.: 226-3192 -246-9423 
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Enxadrista gxperiente, Luciano Nilo de An- 
drade jA escreveu para os jornais "Correio da 
ManhS". "Data News" e "Ultima Mora" e pa- 
ra a iv\fista "Fatos & Fotos". Luciano 6 econo- 
mista, trabalhando no Minisx^rio da Fazanda. 
no Rio de Janeiro. As opinides e comentSrios 
de Luciano Nilo de Andrade, bem como as 
ultimas novidades do Xadrez jogado por com- 
putadores, estarSo sempre presentes am 
MICRO SISTEMAS. 



Atari, uma opcao 
enxadristica 



brancas jogaram bem. Mas, agora elas 
dao oportunidade ds pretas para uma 
reagao. 24 - ...BxC; 25 - BxB C5D; 26 

- T3R(?). Com 26 - T8R+ TxT; 27 - 
BxT as brancas evitartam a perda da 
qualidade. 26 - ...C7B; 27 - P4TD. As 
brancas perdem a ultima oportunidade 
de salvar a qualidade. 27 — ...T2C; 28 — 
B6R+ RID; 29 - T1BD CxT+; 30 - 
PxC T1R; 31 - B5B(?). O que se passa 
com o programa Steinrtz? Depois de es- 
tar com a partida ganha, aos poucos vai 
deteriorando a sua vantagem. Com 31 — 
BSD, seguido de P5R, poderia defender 
o PR. 31 - ...TxPR; 32 - TxP TxPCD; 
33 - T8B+ R2R; 34 -TIB. Para evitar 
mate na retaguarda. 34 — ...T(6I7R; 
35 - BxP R1D(?I; 36 - B4R TxPTR; 
37 - P4D T(7T)7D; 38 - P5D T5D; 
39 - B2C TxPT. A vantagem obtida pe- 
las brancas evaporou-se. Agora elas pre- 
cisam lutar pelo empate. Nesta faseelas 
mostraram engenhosidade e as pretas jo- 
garam puerilmente. 40 — P6D T6C; 41 

— B3T e o Steinrtz conseguiu a posipao 
que buscava ao iniciar o avan^o do PD. 
41 - ...TxP+; 42 - R2T TxB+. Forcpa- 
do, para evitar mate ou a coroapSo do 
pelo. 43 - RxTT5D;44-T1CRT4D; 
45 - TxP T7D; 46 - T6C RIB; 47 - 
R4C R2D; 48 - R4B TxP e a partida foi 
dada por empatada por exaustSo dos ad- 
verstlrios. 



Sensory (ni'vel 4) 

X 

Great Game Machine 

(ni've! 3} 

Cadencia: 1 minuto p/jogada 



1 - C3BR P4D; 2 - P4BD P3BD; 3 

- PxP PxP; 4 - P4D C3BR; 5 - P3R 
B2D; 6 - B3D C3BD; 7 - B2D TIB; 8 

- 0-0 D3C; 9 - C3B C5CD; 10 - C4TD 
D3D; 11 - BxC DxB; 12 - P3CD BxC; 
13 - PxBP3CD; 14 - B5C+ RID; 15 - 
C5R R2B; 16 - B6T R1C; 17 - BxT 




PosipSo ap6s 22 —...D4T. As brancas dSo ma- 
te em tr^s lances. 



RxB; 18 - D2B+ R2C; 19 - TR1B 
R3T; 20 - D8B+ R4T; 21 - C6B+ 
RxP; 22 — D6T+ D4T. As brancas anun- 
ciam mate em tres jogadas. 23 — CxD! 
PxC forgado, pois sen3o viria C6B+^ 
em seguida. 24 — D3D C5R ou qualquer 
outro lance, e 25 - D3C++. 



Ramiro da Costa A/me/da 

X 

Video Chess Atari 
(ni'vel 2} 



1 -P4RP4R;2-P4BR PxP;3-C3BR 
C3BD; 4 - B4B C3BR; 5 -C38DP3D;6 
-P4D D2R;7-0-0,impedindoacaptu- 
ra do PR, porque a torre ocuparia a co- 
luna do ret. 7 - ...B2D; 8 - BDxP 
CRxP(?). Atariienlouqueceu.Ele pre- 
cisava de mais tempo para nSo cometer 
OS erros que realizou nesta partida. Seu 
jogo no ni'vel 4, com 1 minuto para cada 
jogada, 6 superior. 9 -CxC P4CD; 10 - 
BxP CxPD; 11 - BxB+, a debacle das 
pretas 6 total. 11 - ...RID; 12 - DxC 
DxB; 13 - TD1D P3BR; 14 - Ct4)5C 
DIB; 15 - TR1R TD1C; 16 - C6R+ 
R2D; 17 - CxB+ TxC; 18 - BxP. Com 
duas pepas a menos e sob violento ata- 
que, as pretas nao podem fazer mais na- 
da. 18 - ...PxB; 19 - DxP++. ■ 



D~[ ST. Fernando Birman, leitor 
desta coluna, deseja saber no 
que consiste o Great Game Ma- 
chine, qual a melhor m^quina para jo- 
gar Xadrez encontrada na prapa e qual 
minha opini3o sobre o Atari. 

A carta do sr. Birman veio bem a pro- 
p6sito, porque outros leitores j^ reveia- 
ram interesses semethantes. A respeito, 
posso informar o seguinte. 

Great Game Machine (GGM) ^ urn 
micro (portanto pequeno) do tamanho 
aproximado de uma caixa de charutose 
programado exclusivamente para jogar 
Xadrez. Ele 6 fabricado nos Estados 
Unidos e vem com um pequeno tabu- 
teiro e respectivas pepas. 

GGM dispoe de tres programas, um 
para cada fase do jogo, sugestlvamente 
denominadosGrunfeW (paraaabertura), 
Lasker (para o meio jogo) e Capablanca 
(para os finais). No ano passado, o fa- 
bricante lanpou o programa Steinitz, 
que substitui os trds, jogando bem e re- 
solvendo problemas de mate com muita 
facilidade. 

prego do Great Game Machine va- 
ria conforme os programas adquiridos e 
est^ em trono de US$ 200. 

E qual a melhor mdquina? Todos os 
anos surgem aparelhos cada vez melho- 
res. prepo ^ o primeiro e mats sim- 
ples indicador. Por^m, para quem nSo 
quer gastar US$ 500 com o Elite ou 
tJS$ 1 mil com um Prestige, a melhor 
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pedida no momento ^ o Sensory, atual- 
mente em torno de US$ 150. Os tres 
aparelhos s3o amertcanos e do mesmo 
fabricante. 

As revistas de Xadrez, especialmente 
as americanas, francesas e inglesas, es- 
tSo cheias de anuncios de diversos fa- 
bricantes da Alemanha, Irlanda, Hong 
Kong e EUA. 

Byte i um micro brasileiro tam- 
b6m feito exclusivamente para jogar Xa- 
drez e que tern tido boa aceitapSo. No 
ano passado, nesta coluna, foi dada am- 
ple divulgapSo de sua performance, sob 
v^rlos aspectos. 

Com excep3o do Byte, os demais 
aparelhos sHo adquiridos por encomenda 
a viajantes que vSo ao exterior ou atra- 
v^s de anuncios em jornais e nos Clas- 
sificados de MICRO SISTEMAS, j4 que 
sua importapao e comercializapSo i prol- 
bida por iei. 

Para os que j5 tern um vfdeo game 
Atari ou pensam em adquirir um para se 
entreterem com as inumeras modallda- 
des tudicas de que ^ capaz, o programa 
de Xadrez Video Chess 6 um must. Ele 
^ o entretenimento ideal para os enxa- 
dristas que nSo frequentam clubes, es- 
pecialmente peto custo marginal de 
aquisipSo de seu programa. 

Vejamos a seguir algumas partidas 
com Video Chess, o Sensory e o Great 
Game Machine. 



Great Game Machine 
{Steinitz, ni'vel 3} 

X 

Video Chess Atari 

(ni'vel 4} 

Cadencia: 1 minuto p/jogada 



1 - C3BR P4BD; 2 - P3CR C3BD; 3 - 
B2C P4R; 4 - C3DB P4D; 5 - P3D 
C3BR; 6-0-0 B3D; 7 - B5C B3R; 8 - 
P4R C2R; 9 - TR1R. Ameapa capturar 
o PR.9-...D2B;10-C5C! D38; 11 - 
CxB DxC; 12 - PxP C(3lxP; 13 - CxP 
T1CD. Atari, depois de falhar ao n3o 
evitar a perda do pe3o,foge das compli- 
capoes que seguiriam depois de 13 ~ 
...P3BR; 14 ~ C4B. 14 - P4BD C3BR; 
15 - D4T+ P4CD. Assediadas pelo gran- 
de domfnio de espapo das brancas, as 
pretas j^ nSo conseguem reagir de forma 
satisfatbria. 16 - DxPT D3C. Procuram 
trocar as damas para reduzir a pressSo 
adversaria. 17 - DxD TxD; IB - PxP 
TxP; 19 - T2R. Com 19 - P3CD as 
brancas llberariam a torre para missSes 
mais importantes do que defender o 
PCD. 19 - ...C(3B)4D; 20 -BxC CxB; 
21 - C6B C4B!; 22 - BSD R2D; 23 - 
CSR+ R1BD; 24 - CxP. At6 entSo as 
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MEMPHIS e 

Central em suprimentos para Informatlca 

Para a sua empress que tem necessidade de um fornecimento ininterrupto de su- 
primentos para a area de processamento de dados, existe a Central de Suprimentos 
da Memphis. Industrlalizando e distribuindo produtos para informdtica a Memphis 
constitui-se hoje na alternativa mais confiSvel devido ao know how acumulado du- 
rante seus 13 anos de atividades, o que assegura k sua empresa o excelente desem- 
penho dos produtos Memphis. AI6m disso, 
onde voc6 tem a comodidade de encontrar 
no mesmo local todos estes produtos: Pitas 
Magn6ticas, Cassetes, Discos, Diskettes, Disk 
Packs, Etiquetas, Datas Cartridges, Mesas 
para Terminals e Impressoras, Pasta para 
Formularies Continuos, Fitas Impressoras e 
Arquivos Modulados para Pastas. 

A MEMPHIS distribuidora exciuslva para o 
Brasil dos produtos Verbatim, lanpa agora 
Diskettes naclonais (produzidos na Zona 
Franca de Manaus) nos tamanhos de 5V4" e 
8" para todos os tipos de computadores. 

5 ANOS DE GARANTtA "DESCONTOS 
ESPECIAIS PARA REVENDEDORES 
AUTORIZAOOS MEMPHIS". 

• Em fase de nomeapao de novos Revende- 
dores Autorizados Tel.: (011) 262-5332. 



memphis 



VENDAS: Av. Arnolfo de Azevedo. 108 

Pacaembu PABX (Oil) 262-5577 

TELEX U° (Oil) 34545, 

FILIAL RIO; Praia do Flamengo. 66 - cj. 1519 - 

Tels,: (021) 205-3849 e 225-3469 
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Controle sua despesa mensal ou anual em gasolina, feijao, arroz, livros... 
e combata a inflaoao mesmo nao sabendo programar\ 



Controle seu orcamento 
noTKeNE 




Renato Degiovani 




aiba exatamente todas as suas despesas neste 
programa que apresenta varies resultados; 

gasto total anual, gasto total de um 

determinado mes, e gasto anual de um certo item. 

Desenvolvido para equipamentos similares ao 
NE-Z8000 com. 16 Kb de RAM, o programa e facil de 
ser usado at^ mesmo por quem nao conhece nada de 
programapao, pois ele e auto-explicativo. E quem 
conhece um pouco de programatpao pode observar a 
t^cnica de critica dos dados presenteem todo o 
programa. 
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sistema ^ simples: tern um arquivo (matriz) com 
OS nomes dos itens e os valores correspondentes em 
cada mes. Esse arquivo deve ser definido quando o 
sistema for utilizado pela primeira vez, atrav^s da 
instrugao DEF. Agora e so rodar o programa e... 
cortar os custos! 



Renato Degiovani 4 formado em ComunicafSo Visual e Desenho In- 
dustrial pela Pontift'cia Universidade Catdlica do Rio de Janeiro. H4 
mais de um ano utHiza o NE-Z8000 para c^lculos na 4rea em que atua. 



Controlando as despesas 



1 


REM "A/00 4" 


14 


REM ** INSTRUCOES '* 


15 


CLS 


16 


PRINT "INSTBUCOES: " 


17 


GOSUB 100 


la 


PRINT "ESTE PROGRAMA MANTEM 




UM ARQUIVO" 


19 


PRINT "DE DADOS, REFERENTES 




A DESPESAS" 


20 


PRINT "MENSAIS, QUE DEVE SER 




DEFINIDO" 


21 


PRINT "NA PRIMEIRA UTILIZACA 
0." 

PRINT 


22 


23 


PRINT "AS INSTRUCOES PARA OP 




ERACAO SAO" 


24 


PRINT "EXPLICADAS DURANTE A 




EXECUCAO" 


25 


PRINT "DO PROGRAMA." 


26 


PRINT 


27 


PRINT "SE HOUVER ERRO, NA EN 




TRADA DE" 


28 


PRINT "DADOS, SISTEMA INFO 




RMARA, NA" 


29 


PRINT "ULTIMA LINHA, PELOS C 




ODIGOS : " 


30 


PRINT 


31 


PRINT "C/R= CODIGO SEM REGIS 




TRO" 


32 


PRINT "E/D= ERRO DE DIGITACA 

0" 

PRINT "I/R= INSTRUCAO SEM RE 


33 




GISTRO" 


34 


GOSUB 120 


35 


GOSUB 140 


36 


CLS 


37 


PRINT "INSTRUCOES: " 


38 


GOSUB 100 


39 


PRINT "PARA CORRIGIR, UM DAD 




COMPUTADO, " 


40 


PRINT "BASTA DIGITAR ""ERRO" 




" E REINICIAR" 


41 


PRINT "A OPERACAO." 


42 


PRINT 


43 


PRINT "PARA ARQUIVAR PROGR 




AMA, QUANDO 0" 


44 


PRINT "SISTEMA PEDIR INSTRUC 




OES, DIGITE" 


45 


PRINT 'SAV""." 


46 


GOSUB 120 


47 


GOSUB 140 


50 


CLS 


52 


PRINT "CODIGOS DE INSTRUCOES 


54 


GOSUB 100 


56 


PRINT "■"■dEF""= DEFINE AS MA 




TRIZES E ZERA" 


58 


PRINT TAB 7; "OS VALORES." 


60 


PRINT 


62 


PRINT """OPR= OPERA A ENTRAD 




A DE DADOS . " 


64 


PRINT 


66 


PRINT ARQ""- PERMITE ACES 




SO AO ARQUIVO" 


68 


PRINT TAB 7;"DE DADOS." 


70 


PRINT 


72 


PRINT """INS""= RETOHNA QUAD 




RO DE" 


74 


PRINT TAB 7 J "INSTRUCOES. " 


76 


PRINT 


78 


PRINT """COD""= RETORNA QUAD 




DRO DE CODIGOS" 


80 


PRINT TAB 7;"DE INSTRUCOES. 


82 


PRINT 


84 


PRINT "■'"SAV""= GRAVA PRO 




GRAMA EM PITA" 


86 


PRINT TAB 7;"CASSETE." 


92 


GOSUB 120 


94 


GOSUB 160 


96 


GOSUB 196 


98 


GOTO 94 


100 


REM ** LINHA SUP «■ 


102 


FOR J=l TO 32 


104 


PRINT "-"; 


106 


NEXT J 


108 


PRINT 



109 PRINT 
112 RETURN 

120 REM ** LINHA INF ** 

122 PRINT AT 20,0; 

124 FOR J=l TO 32 

126 PRINT "-"; 

128 NEXT J 

130 RETURN 

140 REM •* ENTER •* 

142 PRINT AT 21,0; "PARA CONTINU 

AR DIGITE ""ENTER""" 
144 INPUT U$ 
146 IF U?="" THEN RETURN 
148 GOSUB 166 
150 GOSUB 196 
152 GOTO 142 
160 REM ** INSTRUCOES ** 

162 PRINT AT 21,0; "DIGITE INSTR 

COES : 
164 INPUT U$ 

166 IF U$="" THEN GOTO 164 

168 IF Vf'DET" THEN GOTO 268 

170 IF Uf=''OPR" THEN GOTO 450 

171 IF U$="SAV" THEN GOTO 900 

172 IF U$="ARQ" THEN GOTO 600 
174 IF UJ="1NS" THEN GOTO 14 
176 IF U?="DIS" THEN GOTO 300 
178 IF U?="VAL" THEN GOTO 370 

180 IF UJ="COD" THEN GOTO 50 

181 IF U|="TOT" THEN GOTO 790 

182 IF U$="MES" THEN GOTO 640 
184 IF U?="PAR" THEN GOTO 720 
186 RETURN 

188 PRINT AT 20,2;" ";US;" ";AT 

20,25;" C/R " 

190 RETURN 

192 PRINT AT 20,2:" ";U$;" ";AT 

20,25; " E/D " 

194 RETURN 

196 PRINT AT 20,2;" ";U$;" ";AT 

20,25;" 1/R ■■ 

198 RETURN 

200 REM ** MESES •* 

202 PRINT AT 21,0!"DIGITE O NUM 

ERO DO MES:" 

204 GOSUB 164 

206 LET M$="" 

20 8 LET M= VAL U$ 

210 IF.M=1 THEN LET M?="JANEIRO 

212 IF M=2 THEN LET M?="FEVEREI 
RO" 

214 IF M=3 THEN LET M$="MARCO" 
216 IF M=4 THEN LET M*="ABRIL" 
218 IF M=5 THEN LET M$="MAIO" 
220 IF M=6 THEN LET M$="JUNHO" 
222 IF M=7 THEN LET MJ-"JULHO" 
224 IF M=8 THEN LET M$="AGOSTO" 
226 IF M=9 THEN LET M$="SETEMBR 

O" 
228 IF M=10 THEN LET H$="OUTUBR 

O" 
230 IF H=ll THEN LET M$="NOVEMB 

RO" 
232 IF M=12 THEN LET M$="DEZEMB 

RO" 
234 IF NOT M*="" THEN RETURN 
236 GOSUB 192 
238 GOTO 202 

240 REM •* PADRCMIZA VALOR ** 
242 LET R=12 
244 GOTO 248 
246 LET R=9 

248 LET V*=STR$ V 

250 LET A=(V-INT V) *100 

252 IF A>9 THEN LET V$=V$+"0" ,. 

254 IF A=0 THEN LET VJ=V?+".00 

256 LET B=LEN V$ 

258 IF B=R THEN GOTO 264 

260 LET V$=" "+V$ 

262 GOTO 256 

264 PRINT V* 

266 RETURN 

268 REM •* DEFINE MATRIZES ** 

270 CLS 

272 PRINT "MATRIZ A SER DEFINID 
A: " 

274 GOSUB 100 
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Syttam Design Ltda. • InFormatiea 

SOFTWARES DI5PONIVEIS PARA 

MICROS EM DOS (Apple e Similarej) 

PASSO A PASSO - Clirso de Basic «m 
diskette de fdcll. rdpldo e eflclente apren- 
dlzado no seu proprlo micro CrS 60.000,00 

MAILER - Mala dlreta com vdrlas op?6es 
de emissao CrS 35.000,00 

MICROWRITER - Eflclente processador de 
textos Cr8 60.000,00 

DOS 3.3 BASICS - UtINtirlo para otlmlzar 
seu DOS Cr8 45.000,00 

JOGOS - Vdrlos logos eatrat6glcos e de 
aventura crS 15.000,00 

Oilmplada, SImulador de voo, Xadrez 
Chopllitor (■•), Castelo Wolfensteln, Casa 
dos Misterlos, Combale Aerdo (*) Invaders 
(•), Zork (•). 

*Utlllzam DOS 3.3 BASICS 

"Utillzam conUoladores Ooystlck/paddles) 



PEDIDOS - Atrav^i do che(;ue nominal k 
nossa calxa postal ou por t e I e f o n e 
{Atendemos todo o Brasll via VARIG). 

CEP 05096 - Cx. Postal 60136 - S. Paulo 

Tel.: 813-4031 



CALCULADORAS 
-HP- 



Compre aquele modelo novo 

que voce deseja, mas traga 

sua calculadoro HP usada 

para uma avalia^ao, pois 

ela entro como parte de 

pagamento da novo. 



Venha pessoalmente, ou 
telefone e fale c/o Johnny 



J. Heger & Cio 
Revendedor Aut. H.P. 



Av. Mocci, 155 - Moemo 
532-1856 SP. (Oil) 



CONTROLE SEU ORQAMENTO NO TK E NE 



276 PRINT """DIS""= DEFIWE A DI 

SCRIMINACAO" 
278 PRINT TAB 7;"E>0S GASTOS MEN 

SAIS." 
280 PRINT 
282 PRINT ""''VAL""= DEFINE OS V 

ALORES DOS" 
284 PRINT TAB 7; "GASTOS MENSATS 



290 
292 

294 
296 
298 

300 
302 
306 
30 8 
310 

312 

314 

316 

317 
318 

319 

320 
322 
324 
326 
328 
330 

332 
334 
336 
338 
340 

342 
344 
346 
346 
350 
352 
354 
356 
358 
360 
362 
364 
366 
368 
370 
372 
374 
376 
378 
380 

382 

384 

386 

388 
390 
39 2 
394 
396 
398 
400 
404 

406 
450 
452 
454 
456 
458 
460 

462 
464 
466 
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GOSUB 120 

PRINT AT 21,0; "DIGITE COD 

I GO DA HATRI2:" 

GOSUB 164 

GOSUB 188 

GOTO 292 

REM * DISCRIMINACAO » 

LET C=0 

DIM G¥(30,15) 

CLS 

PRINT "DISCRIMINACAO DOS GA 

STOS : " 

GOSUB 100 

PRINT "CAPACIDADE DO ARQUIV 

0= 30 HOMES" 

PRINT "DE 15 LETRAS CADA UM 

PRINT 

PRINT "AO FINAL DA LISTA DI 

GITE ""FiM""" 

PRINT 

PRihT 

IF C=0 THEN LET A=l 

IF C=10 tAeN LET A=ll 

IF C=20 THEN LET A=21 

GOSUB 120 

PRINT AT 21,0; "DIGITE DISCB 

I MI N ACAD:" 

LET T=9 

FOR I=A TO A+9 

LET C=C+1 

LET T=T+1 

IF C<10 THEN PRINT AT T,0;" 

IF C>9 THEN PRINT AT T,0; 

PRINT C; " "; 

GOSUB 164 

IF U$ = "ERRO'* THEN GOTO 300 

IF U$="FIM" THEN GOTO 364 

LET G$(I)=U$ 

PRINT G${I) 

NEXT I 

IF C=30 THEN GOTO 364 

GOSUB 140 

IF C<21 THEN GOTO 308 

GOSUB 160 

GOSUB 196 

GOTO 364 

REM * VALORES DOS GASTOS * 

CLS 

PRINT "VALORES DOS GASTOS:" 

GOSUB 100 

PRINT AT 4,12; "ATENCAO:" 

PRINT AT 6,0;"ESTA INSTRUCA 

CANCELA TODOS OS" 

PRINT "VALORES, AHTERIORES 

A ELA," 

PRINT "REFERENTES AOS GASTO 

S MENSAIS . " 

PRINT AT 10,0; "PARA OPERAR 

A INSTRUCAO DIGITE" 

PRINT MAT""." 

GOSUB 120 

GOSUB 160 

IF U?="MAT" THEN GOTO 400 

GOSUB 196 

GOTO 39 2 

DIM G(12,30) 

PRINT AT 15,0; "TODOS OS VAL 

ORES ESTAO ZERADOS." 

GOTO 39 2 

REM •* ENTRADA DE DADOS ** 

CLS 

LET C=0 

PRINT "ENTRADA DE DADOS:" 

GOSUB 100 

PRINT "QUAL O MES A SER INT 

RODUZIDO?" 

GOSUB 120 

GOSUB 200 

CLS 



468 


LET T=10 


681 


LET V=G{M,I) 


470 


PRINT "RELACIONE GASTOS DE: 


682 


GOSUB 246 




";H* 


683 


IF C=10 OR C=20 THEN GOTO 


472 


GOSUB 100 




86 


474 


PRINT "AO FINAL DA LISTA DI 


684 


NEXT I 


476 


GITE ""FIM""." 

PRINT AT 8,0; "CD DISCRIMINA 


666 
688 


GOTO 698 

PRINT AT 18,6; "SUB TOTAL CR 




CAO";AT 8,22; "VALOR" 




* "; 


478 


GOSUB 120 


669 


LET V=ST 


480 


PRINT AT 21,0; "DIGITE DISCR 


690 


GOSUB 240 




IMINACAO : 


691 


LET TT=TT+ST 


482 


GOSUB 164 


692 


GOSUB 120 


484 


IF U»="FIM" THEN GOTO 530 


694 


GOSUB 140 


486 


IF UJ="ERRO" THEN GOTO 466 


696 


GOTO 658 


488 
490 


LET U=LEN U$ 

IF U=15 THEN GOTO 496 


698 

700 


T,T^T TT=TT+ST 

PRINT AT 18,10; "TOTAL CR$ " 


492 


LET UJ=U$+" " 




■" 


494 


GOTO 468 


701 


LET V=TT 


496 


FOR 1=1 TO 30 


702 


GOSUB 240 


498 


IF U$=G$(I) THEN GOTO 506 


703 


GOSUB 120 


500 


NEXT I 


704 


GOSUB 160 


502 


GOSUB 192 


706 


GOSUB 196 


504 


GOTO 4 80 


708 


GOTO 704 


506 


IF I<10 THEN PRINT AT T,0;" 


720 


REM • DESPESA PARCIAL * 




" i 


722 


CLS 


508 


If'i>9 THEN PRINT AT T,0; 


724 


PRINT "DESPESA ANUAL POR IT 


510 


PRINT I;" "jGJd) ; " CRj " 




EH: " 


511 


GOSUB 120 


726 


GOSUB 100 


512 


PRINT AT 21,0; "DIGITE VALOR 


726 


PRINT "QUAL ITEM A SER CO 




REFE RENTE : " 




NSULTADO? " 


514 


INPUT G(M,I) 


730 


GOSUB 120 


516 


PRINT AT T,23; 


732 


PRINT AT 21,0; "DIGITE A DIS 


517 


LET V=G(M,1) 




CRIMINACAO;" 


518 


GOSUB 246 


734 


GOSUB 164 


519 


LET T=T+1 


736 


LET U=LEN U$ 


520 


LET C=C+-1 


738 


IF U=15 THEN GOTO 744 


522 


IF T=20 OR T=10 THEN GOTO 5 


740 


LET U$-U?+" " 




26 


742 


GOTO 736 


524 


IF C<31 THEN GOTO 478 


744 


FOR 1=1 TO 30 


526 


GOSUB 140 


746 


IF U$=G$CI) THEN GOTO 754 


526 


IF C<21 THEN GOTO 466 


748 


NEXT I 


5 30 


GOSUB 160 


750 


GOSUB 192 


532 


GOSUB 196 


752 


GOTO 732 


534 


GOTO 5 30 


754 


CLS 


600 


REM ** AROUIVO DE DADOS ** 


756 


PRINT "DESPESA ANUAL DE : "; 


602 


CLS 




G$(I) 


604 


PRINT "ARQUIVO DE DADOS:" 


758 


GOSUB 100 


606 


GOSUB 100 


760 


LET TT=0 


608 


PRINT MES""= MOSTRA CAST 


762 


FOR M=l TO 12 




OS REFERENTES" 


764 


GOSUB 210 


610 


PRINT TAB 7; "A UM DETERMINA 


766 


LET TT=TT+G(M,I) 




DO MES . " 


768 


PRINT M$, "CR$ "; 


612 


PRINT 


769 


LET V=G(M,I) 


614 


PRINT PAR""= MOSTRA CAST 


770 


GOSUB 240 




ANUAL DE UM" 


771 


NEXT M 


616 


PRINT TAB 7; "DETERMINADO IT 

EM." 

PRINT 


772 


PRINT AT 18, lOj "TOTAL CR$ " 


618 


773 


LET V=TT 


620 


PRINT """TOT""= MOSTRA CAST 


774 


GOSUB 240 




ANUAL." 


775 


GOSUB 120 


632 


GOSUB 120 


776 


GOSUB 160 


634 


GOSUB 160 


776 


GOSUB 196 


636 


GOSUB 196 


780 


GOTO 776 


638 


GOTO 634 


790 


REM * DESPESA ANUAL * 


640 


REM * DESPESA MENSAL • 


792 


CLS 


642 


LET C=0 


794 


PRINT "DESPESA ANUAL:" 


643 


LET X=l 


796 


GOSUB 100 


644 


LET TT=0 


798 


LET TT=0 


646 


CLS 


800 


FOR M=l TO 12 


648 


PRINT "DESPESA MENSAL:" 


802 


GOSUB 210 


650 


GOSUB 160 


804 


PRINT M$, "CR$ "; 


652 


PRINT "QUAL MES A SER CON 


806 


LET ST=0 




SULTADO?" 


808 


FOR 1=1 TO 30 


654 


GOSUB 120 


810 


LET ST=ST+G{M,I) 


656 


GOSUB 200 


812 


NEXT I 


658 


CLS 


814 


LET TT=+ST 


660 


PRINT "DESPESA REFERENTE A: 


815 


LET V=ST 




";M$ 


816 


GOSUB 240 


662 


GOSUB 100 


618 


NEXT M 


664 


PRINT AT 5,0; "CD DISCRIMINA 


620 


PRINT AT 18,10; "TOTAL CR? " 




CAO";AT 5,22;"VALOR" 




J 


666 


PRINT 


821 


LET V=TT 


668 


LET ST=0 


822 


GOSUB 240 


670 


FOR I=X TO 30 


823 


GOSUB 120 


672 


LET ST=ST+G(M,I) 


824 


GOSUB 160 


674 


IF G(M,I)=0 THEN GOTO 684 


826 


GOSUB 196 


676 


LET C=C+1 


828 


GOTO 824 


677 


LET X=I+1 


900 


REM ** CODIGO DE ARQUIVO ** 


678 


IF I>10 THEN PRINT " "; 


902 


SAVE "A/004" S 
GOTO 14 ^ 


6 80 


PRINT I;" "fGJd);" rn« " - 


904 



As linhas completas de 
microcomputadores, das marcas 
de absoluta qualidade, voce 
encontra na Imares. E em regime 
de pronta-entrega. 
Parece igual a outras Iqjas de 
compittadores? Mas nao e. Para 
ini'cio de com>ersa. a Imares 
implantou umafilosofia propria 
de comportamento que engloba 



uma serie de sen'igos: coloca 
eqiupamentos, softwares e 
pessoal experiente a disposic^ao 
da sua clientela e da global 
orientagao de compra do 
equipamento adequado as suas 
necessidades, atuais efuturas. 
Feita a escolha, o seu 
relacionamento com o 
microcomputador sera de 



permanente tranquilidade. 
A Imares tem um corpo de 
iecnicos de hardware e software 
altamente especializado, pronto 
a prestar plena assistencia 
tecnica e manuten(,do, sempre 
que necessdrio. Ede mais 
a mais, na Imares o seu micro tem 
dupla seguram^a: da propria 
Imares e dofabn'cante. 




Na Imares 



seu micro tem 
dimla sefluranca 



micfocomputQdore/ 



Av. dos Imares, 457 - Tels.: 61-094614049 - CEP 04085 - Moema - SP 
Rua Dr. Renato Paes de Barros. 34 - Tels.: 881-020011 156 - CEP 04530 - Itcdm - SP 
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Veja como o DMA permite a transferencia de dados de um periferico para a 
memdria e vice-versa, sem a intervengao do microprocessador. 
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VIA OE ohoas secuhdAhia 



ODMA: acesso direto 
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Orson Voerckel Galvao 
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Figura 1 

(3) O periferico gera uma !nterrupgSo. 

@ O DMA coloca na via secundaria de endere<;os o endereco de memdria para onde deve ser dirigido o dado proveniente do perifSrico. Paralefa- 
men a, o estado do pino SYNC da UCP 4 monitorado. 

(3) Assim que surge o sinal no pino SYNC, o DMA ativa os circuitos de chai-eamento de dados e endere^amento para a ativafSo das viasde dados 
e enderefo secund^rias e gera os sinais de controle para o periferico e memdria. Iniciase a transferencia baixando o sinal de SYNC e o circuito da 
cfiBveamento de dados e linha ativa novamente as vias de dados e enderego principals. 



Em nosso ultimo artigo fi- 
cou no ar a promessa de se 
labordar o tal de DMA (Di- 
rect Memory Access), ou, como 
preferem alguns, Acesso Direto a 
Mem6ria (ADM). 

Retornemos entao ao ultimo as- 
sunto abordado: as interruppoes. 
Vimos que as interruppoes sao 
muito uteis quando ocorrem Inter- 
venpoes geradas por elementosex- 
ternos a UCP de forma nao cons- 
tante, ou seja, intervenpoes que 
surgem de forma assi'ncrona. 

Utilizada a fiiosofia de trata- 
mento de interruppoes, a UCP per- 
manece executando a rotina prin- 
cipal e, ocorrendo uma interven- 
pao exterior, d feito o seguinte 
processor 

1 — A UCP assegura que a instru- 
pao em execupao no seu interior 
seja completada; 

2 — £ dado ini'cio ao tratamento 
da interruppao atraves da coloca- 
pao de uma instrupao RST n na 
via de dados pelo equivalente que 
gerou a interruppao; 

3 - Encerrado o tratamento da 
interruppao, o controle volta a ro- 
tina principal, a partir da instru- 
pao seguinte aquela durante a qual 
ocorreu o pedido de interruppao. 
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At6 at' ^ tudo repeteco para vo- 
ces. Mas vejamos do que se com- 
poe a tal da rotina de tratamento 
de interruppao. Em primeiro lugar, 
devem ser tornados cuidados con- 
tra a destruipao do conteudo dos 
registradores da UCP enquanto o 
controle da mesma ainda e exerci- 
do pela rotina principal. A este 
processo chamamos de salvar re- 
gistradores. 

A primeira instrupao deste pro- 
cesso podera ser, opcionalmente, 
um Dl {Disable Interrupt), o que 
representa para a UCP uma ordem 
para desconsiderar quaisquer inter- 
ruppoes que possam vir a ocorrer. 

processo de salvar o conteudo 
dos registradores ^ levado a cabo 
por quatro instrupoes PUSH con- 
secutivas, cada uma referindo-se 
aos pares de registradores da UCP 
(PSW, BC,DE,HL). 

Se foi utilizada uma instrupao 
Dl no ini'cio do processo, pode-se 
opcionalmente permitir que vol- 
tem a seraceitas novas interruppoes 
dentro do tratamento da inter- 
ruppao atual atraves da instrupao 
El {Enable Interrupt). 

Salvo o conteudo dos registra- 
dores, inicia-se a rotina de trata- 
mento de interruppao propriamen- 



te dita. tratamento mais sim- 
ples seria o de ler um byte do ele- 
mento que gerou a interruppao 
(atraves da instrupao IN n) e arma- 
zenar tal conteudo em um endere- 
po de memoria predefinido para o 
processamento posterior pela roti- 
na principal. 

Feito isso, deve-se recolocar nos 
registradores as informapoes ante- 
riormente salvas. A este processo 
chamamos de restaurar os regis- 
tradores. Para isto, necessitaremos 
opcionalmente de inibir interrup- 
poes, restaurar o conteudo dos 
quatro registradores da UCP (atra- 
ves da instrupao POP) e apos, 
opcionalmente, voltarmos a per- 
mitir interruppoes, retornarmos o 
controle a rotina principal (usan- 
do a instrupao RET). 

Esta ^ uma rotina de tratamen- 
to bem simples, pois apenas duas 
instrupoes fazem realmente o tra- 
tamento de interruppao: 

— uma instrupao para leitura do 
byte proveniente do periferico 
(instrupao IN); 

— e outra instrupao para armaze- 
nar este byte em um enderepo de 
mem6ria (a instrupao IN coloca o 
byte proveniente do periferico no 
registrador A) atraves da instru- 
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pao STA (que transfere o conteu- 
do do registrador A diretamente 
para o enderepo de memoria es- 
pecificado na instrupao STA). 

As demais instrupoes sao ape- 
nas de manutenpao (na literatura 
de lingua \nq\esa, house keeping). 
Mas, vejamos uma coisa: para ma- 
nutenpao, sem utilizarmos as ins- 
trupoes Dl e El, sao necessarias 
nove instrupoes (quatro PUSH, 
mais quatro POP e 1 RET); para 
tratamento da interruppao, mais 
duas instrupoes (uma IN e uma 
LDA). Quanto tempo nos consu- 
,miria a execupao desta rotina para 
tratamento de cada interrup- 
pao? Vamos 1^; 



INSTRUpSO 


PUSH 


^^ X t\ = ^^ 


INSTRUpAO 


POP 


^o X k = 1^0 


INSTRUpSO 


RET 


10 X 1 = 10 


INSTRUpAO 


IN 


10 X 1 = 10 


INSTRUpAO 


LDA 


13 X 1 = 13 



TOTAL DE CICLOS = 117 

Se adotarmos que o periodo do 
clock consome 2 ms de tempo, te- 
ri'amos a conclusao que durante 1 
segundo a UCP executaria 500 mil 
ciclosdec/oc/r (10-* ^ 2). Entao, 
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durante 1 segundo poderiam ser 

tratadas 4273 interruppoes. Neste 
caso, a UCP apenas trataria in- 
terruppoes e nao teria tempo para 
mais nada! 

Isto, em termos de micropro- 
cessadores, significa ma perfor- 
mance. E olhem que no nosso 
exempio de tratamento de inter- 
ruppao nao utilizamos nenhuma 
manipulapao adicional do dado 
recebido, coisa que invariavelmen- 
te e feita em sistemas reals. Vo- 
ces devem concordar que e muita 
instrupao para pouca solupao (o 
simples armazenamento de um by- 
te proveniente da memoria). 

Agora pergunto eu: e se ao in- 
ves do controle ser feito pela 
UCP, atraves de programa (soft- 
ware), fosse por interm^dio de 
um circuito auxiliar (hardware)? 
E mais: com a possibilidade de 
transar simultaneamente com a 
UCP sem interferir no processa- 
mento desta! £ possi'vel? 

Bem, em primeiro lugar vamos 
ver quais as vantagens. De bate- 
pronto o conteudo dos registrado- 
res da UCP nao teria necessidade 
de ser salvo e depois restaurado, o 

que me economizaria oito instru- 

» 

m 
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DMA: ACESSO DIRETO A MEMORIA 



goes. Em segundo lugar, nao have- 
ria a necessidade de se utilizar as 
instrugoes de transferencia IN e 
LDA, pois a UCP nao sera inter- 
mediaria do transito do dado en- 
tre o elemento externo e a memo- 
ria. E, per ultimo, nao haveria a 
necessidade da instrugao de re- 
torno (RET), pois nao foi feito 
desvio para lugar algum! 

Ue... nao sobrou nada! Mas nao 
e tao simples assim. Existe um 
onus para essa moleza toda. 
milagre eu ]a contei, agora vamos 
ao nome do santo. 

circuito que permite que se 
ellmine tanta dor de cabeca e o 
muito falado — e pouco compre- 
endido — DMA. Ele vai permitir 
a transferencia de dados de um 
periferico para a memoria e vice- 
versa sem a intervengao do micro-, 
processador. Por isso o nome 
Acesso Direto. 

Vejamos como se da o proces- 
so. Existem duas formas de se im- 
plementar o DMA, cada uma delas 
voltada para a utiliza(?ao em um 
caso especffico, relacionando-se 
com a forma pela qua! os perife- 
ricos recebem e emitem os bytes. 
Alguns, notadamente os de baixa 
velocidade como teclado, linha de 
comunicapao etc, dispoem dos 
bytes um a um e de forma assi'n- 
crona. Outros fazem a transfe- 
rencia dos dados em blocos de 
bytes e de forma si'ncrona (o in- 
tervalo de tempo entre a trans- 
ferencia de cada byte do grupo e 
constante). Este ultimo caso refe- 
re-se a perifericos de alta veloci- 
dade, como OS disquetes. 

Para cada um doscasosmencio- 
nados o nome dado a cada forma 
de DMA 6. respectivamente: 

— DMA por roubo de cicio (Cy- 
cle Stealing DMA) 

— DMA SImultaneo (Simultaneous 
DMA) 

Vejamos como funciona cada 
uma destas formas. Voces lem- 
bram dos nossos ciclos de ma- 
quina? Pois e... voces viram que 
no estado El e parte do E2 ape- 
sar de existirem informagoes nas 
vias externas do micro, nao ocor- 
rem atividades que envolvam a me- 
moria ou OS perifericos. Isto quer 
dizer que este intervalo de tempo 
pode ser utilizado para a transfe- 
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Figura 2 

CD Com a subida do clock 02, surge o sinal 
SYNC na UCP e um enderego na via principal 
de enderegamento. 

® Havendo alguma interruppSo pendente, o 
que 4 evidenciado pela presents do sinal 
INT no DMA, este gera, em combinafSo com 
o sinal SYNC, um sinal K, que causa o chavea- 
mento para as vias de dados, enderepo e con- 
trole secunddrlas. 

® Simultaneamente, o DMA coloca um ende- 
tepo na via de enderefxis secund^rie. 

® Com a descida de 02, surge o status da 
UCP na via principal de dados, estando esta 



rencia de um dado entre estes dois 
elementos. Mas para tanto, e ne- 
cessario uma outra via de acesso, 
enderegamento e controle entre o 
periferico e a memoria. 

esquema de operagSo do 
DMA neste caso 6 o seguinte: 
1 — DMA, ao receber uma in- 
terrupgao do periferico, flea espe- 
rando que aparega uma boquinha 
para ele agir. Ele sente a hora de 



j6 desconectada. Neste momenta sSo garados 
OS sinais de controle para a transferSncia de 
dados pela via secundaria, pelo DMA. O sinal 
INT tf desativado pelo periferico. 

® O sinal SYNC desaparece ao meio do se- 
gundo dock 02. 

® Em consequSncia, o DMA 4 desativado e 
sio reconectadas ao circuito todas as vias prin- 
cipals. O dado jd foi transferido do periferico 
para a memdria. 

® A via de dados principal estS Uberada para 
as transfer§ncias para a UCP. 



entrada em agao do sinal SYNC 
proveniente da UCP, que e ativado 
toda vez que se entra no estado El; 
2 — Assim que surge a oportuni- 
dade, ele disconecta a via de da- 
dos, enderego e controle que liga 
a memdria a UCP e as conecta ao 
periferico, ja com um enderego 
(pr^-estabelecido) engatilhado e 
com sinais de controle simulando 
OS da UCP; 
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Requisii;ao 
de HOLD _/ 



Figura 3 

Como mostrado na figura, a requlsifSo de 
HOLD deve ocorrer ainda no estado El. Ca- 
so contr^rio. o presents cicIo de m4quina ser^ 
continuado normalmente, sendo a solicita(ao 
atendida apenas no proximo ciclo. O HOLD 
comega a ser tratado no intervalo entre'os es- 
tados E2 e EW. Isto ocorre por mo'tlvo de 
sincronizagSo Interna i UCP. 

Quando o sinal READY aparecer, prove- 
niente do exterior {da memdria) 4 ligada uma 
chave interna indicando que o micro est4 



3 — perifdrico e a memoria, pe/?- 
sando cada um tratar-se de ordem 
de transferencia de dados (para a 
memoria sao simulados os sinais 
gerados pela instrugao NDA e para 

periferico os sinais da instrugao 
IN), mandam/recebem o byte; 

4 — circuitao esta la: um olho 
no padre e outro na missa, digo... 
no micro e no conjunto memo- 
ria/periferico. Quando ele perce- 
ber que o sinal SYNC salu de cena, 
ele chaveia a memoria para as vias 
de dados, enderego e controle li- 
gadas a UCP. Tremendo mau ca- 
rater o rapaz... Enquanto isto, a 
UCP esta create que estd no con- 
trole da situagao. Vejam na figura 

1 esquema de funcionamento do 
DMA e na figura 2 o diagrama de 
sinais. 

Bom, este DMA que mostramos 
aqui ate que e modesto, pois deixa 
a UCP trabalhar, so tirando uma 
casquinha de quando em vez. Ago- 
ra, tal de cyc/e stealing (oiha o 
nome...) segura a UCP na mao 
grande! Como? Muito simples: ele 

MICRO SISTEMAS,junho/83 



pronto para liberar as vias de enderepos e da- 
dos. Isto 4 indicado ao mundo exterior atra- 
v4s colocagio do pino HLDA em estado alto. 
A partir deste momento, o DMA pode ini- 
ciar a transferSncia de dados do perif4rico pa- 
ra a memdria, consumindo o tempo que Ihe 
for necessirio. Terminada a transferSncia, o 
DMA retire o HOLD e a UCP recomega a ope- 
rar normalmente, a partir de novo estado El. 
Como vSem, esta 4 a forma apropriada de se 
implementar o DMA para a transferSncia de 
uma sSrie de dados de uma s6 vez. 



controla o clock da UCP. Quando 
Ihe e necessario, no primeiro mo- 
mento apropriado (estado El) ele 
segura o clock da UCP e faz o que 
quer nas vias de dados, controle e 
enderego. A Intel, fabricante do 
8080, resolveu (para manter as 
aparencias por tanta humilhagao 
pela qual passa um micro nestas 
horas), dotar o seu dileto micro 
de mais um pino: o pino do sinal 
HOLD. Sua finalidade e permitir 
entrosamento das fungoes do 
DMA com as da UCP, sem um cir- 
cuito adicional para controlar os 
sinais de clock (lembrem-se: sao 
dois 61 e 92). Acompanhem na 
figura 3 o funcionamento do DMA 
utilizando o sinal de HOLD e ate 



a proxima. 
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CP200-ZX81 

TK82C-TK80 

NEZ80-ZX80 

NEZ8000-TK85 

Voce tern um destes micros??? 

Se a resposta for sim, entSo o CLUBE NA- 
CIONAL DOS TK/NE/SINCLAIR 6 para vocS. 
Publicamos MICRO BITS, lan^ado em mar- 
go 83, que tern programas, "dicas", escla- 
recimento de duvidas, artigos, cartas, so- 
mente sobre estas mSquinas. 

Ainda nao comprou um micro? 

Agora sua escoiha ficou mais fActl, por que 
comprando um dos micros aclma vocS J6 
pode contar com o CLUBE para conseguir 
utilizd-lo ao maxima. 

Para receber uma cdpia de MICRO BITS a 
maiores informagoes sobre o CLUBE. envie 
CrS 250,00 em cheque nominal, para: 

David Anderson 

MICRO BITS 

CLUBE NACIONAL DOS TK/NE/SINCLAIR 

Caixa Postal 12.464 

04798 SAO PAULO - SP 



Dois colegios de Sao Paulo, o Bandeirantes e o lavne Beith-Chinuch, antecipam-se 
a meta governamental de implantacao de computadores no ensino. 



micro em contatos 
didaticos com o 1? e 2? graus 



Ningu^m ligado a area de Informatica desconhe- 
ce a existencia dos cursos livres, que ja prepa- 
Iraram centenas de usudriosde microcomputa- 

dores. No entanto, poucos sabem que alguns colegios 
com tradifpao na drea educacional estao promovendo 
cursos de processamento de dados e utilizando o com- 
putador no ensino de 19 e 29 graus. 

Visitando dois destes coldgiosem Sao Paulo, vimos 
que diretores e professores estao empenhados nao s6 
em desmistificar o computador como em torna-lo urn 
instrumento auxiliar no ensino, adaptando os alunos 
as exigencias da vida atual. 



O BANDEIRANTES 

Em 1944, a diretoria do Colegio Bandeirantes se 
orgulhava de oferecer a seus alunos um laboratbrio 
equipado com microscopios e outros equipamentos 
que, na ^poca, eram a grande sensagao. Em 1983, o 
Bandeirantes volta a vanguarda tecnologica, colocan- 
do a disposiipao dos atuais 3.500 alunos de 19 e 2o 
graus um curso te6rico/pra'tico de "Introdugao a 
Microcomputapao". 

Conversando com o prof. Sergio Boggio, gerente do 
CPD do Colegio Bandeirantes, f icamos sabendo como 
chegaram a Isto. Em 1975o colegio adquiriu um com- 
putador HP9830A que logo no ano seguinte ja era 
usado na administra(?ao e no controle academico (fre- 
quencia, disciplinas, notas e desempenho dos alunos). 
Em 1980, devido ao crescimento do colegio, o HP foi 
substitui'do por um computador maior, com tres ter- 
minais: um na tesouraria, um na diretoria e um no 
CPD. 

Dois anos depois, em 1982. surgiu a id^ia de intro- 
duzir OS alunos do Bandeirantes ao processamento de 
dados. "DiversQeseletr6nicas",comenta Sergio Boggio, 
"bancos, escritorios automatizados etc: estamos 
preocupadosem formar o jovem para a vida atual. Por 
isso, concluimos que seria da maior importancia dar 
uma inicia(pao na area de Informatica". 
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SSrgio Boggio (E) e Mauro Salles Aguiar (D), do Bandeirantes: 
"Estamos preocupados em formar o jovem para a vida atual". 

Jd diretor-administrativo do Bandeirantes, Mauro 
Salles Aguiar, acha que o curso "6 um bom investi- 
mento tanto em termos educacionais quanto econo- 
micos. Nossa sensibilidade de mercado indica que esta 
6 uma ^rea em crescimento, mas 6 um espago que nao 
est^ sendo preenchido ou o esta por cursos incompe- 
tentes, pois a estes faltam condigoes para investirem 
equipamentos e recursos humanos. Bandeirantes 
tem OS dois". 

Especialmente para o curso de microcomputagao, o 
colegio comprou uma diizia de micros TK82-C e onze 
calculadoras programaveis HP-1 IC e treinou dois pro- 
fessores de sua ^rea de Exatas. As aulas foram inicia- 
das em abril do ano passado para uma turma-piloto 
de 24 alunos, todos do Bandeirantes. De acordo com 
OS resultados obtidos, o curso serd aberto a todos os 
interessados a partir do segundo semestre deste ano. 

As turmas terao sempre um maximo de 24 alunos 
(dois por equipamento), selecionados por idade e 
m'vel de escolaridade. a partir da 7a serie do 19 grau. 

MICRO SISTEMAS, junho/83 



A duragao total do curso sera de 60 horas-auias e seu 
prego girara em torno de Cr$ 46 mil. 

Com alunos treinados e capacitados em processa- 
mento de dados, em 1984, a diretoria do colegio pre- 
tende instalar em sua biblioteca varios microcompu- 
tadores. Segundo Sergio Boggio, esses equipamentos 
serao utilizados para consultas bibliogrdficas e vao 
ajudar os alunos na resolugao de exerci'cios atrav^s de 
explicagoes didaticas. 

MICROS PARA FINS PEDAGOGICOS 

Outro colegio com larga experiencia e tradigao edu- 
cacional na capital paulista, o Col^io lavne Beith- 
Chinuch, tambdm estd usando micros no ensino de 
seus 500 alunos. 

No ano passado, o lavne iniciou seu contato com a 
Informatica atrav^s da criagao do Nucleo de Compu- 
tagao para Fins Pedag6gicos, a partir da doagao par- 
ticular de oito micros D-8000 e da assessoria intelec- 
tual de um grupo de ex-alunos, responsaveis pelos 
programas e apostilas. Desde julho do ano passado o 
Nucleo vem oferecendo gratuitamente um curso de 
"Introdugao ao Processamento de Dados" para alunos 
do 19 grau (7a e 8a series) e de29 grau, compreen- 
dendo nogoesda Linguagem BASIC. 

curso tem um total de 30 horas de duragao, em 
seis aulas semanais, e cada aluno tem uma carteirinha 
que Ihe da acesso aos computadores do Nucleo fora 
do horcirio escolar. Cada turma tem 1 6 alunos e as au- 
las sao ministradas por professores do pr6prio lavne, 
especialmente treinados para a fungao. 

Para a disciplina de matemdtica, por exempio, os 
alunos do curso testam seus conhecimentos atraves de 
programas como este que apresentamos em anexo, o 
qual tem por objetivo avaliar graficos desenvolvidos 
por eles e obter, de forma rapida, um grafico para 
determinada fungao. 

aluno, ou o professor, insere uma fungao definin- 
do OS limites inferior e superior da variavel X e o 
intervalo da fungao para o eixo de 'X'. Nas figuras 1 , 
2 e 3 vemos alguns exemplos de sai'da, onde os valo- 
res de 'X' estao no eixo vertical e os valores de 'Y', 
por sua vez, no etxo horizontal. 

Este ano, o lavne estendeu o curso de PD as 5a e 
6a series do 19 grau e estd utilizando os D-8000 no 
ensino de mat^rias como Estudos Sociais e Hebraico. 
Al^m disso, a diretoria aprovou a inclusao da cadeira 
de Processamento de Dados no curri'culo do 29 grau, 
com uma aula semanal nos computadores do Nucleo, 
que tamb^m estao sendo usados na administragao do 
col^io e no acompanhamento escolar dos alunos. 
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Figura 1 
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Ik r^rr-4r-imr, ASSISTENCIA TECNICA A MICROS E COMPLETA 

& alSlCnia ASSESSORIA EM PROCESSAMENTO DE DADOS 



■ Instalagao, modificagao e ampliagao 

desistemas; 

"Hardware e Software" 



■ Assistencia a Micros: 
Nacionais: Todas as marcas e modelos 
Importados: Sinclair -Trs-80- Apple - 
Micro Ace ■ Rockwell - Cromenco 



■ Manutengao corretiva e preventiva: 
"Hardware e Software" 

Outras marcas poderao ser atendldas 



Seja qual for seu problema, consulte-nos: Av, Presidente Vargas, 542 - sala 21 1 1 - Tel. 571-3860- Rio de Janeiro 
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O MICRO EM CONTATOS DIDATICOS COM O IP E O 2P GRAUS 



Programa plotagem degraficos 



2 REM NUCLEO DE PROCESSAMENTO DE DADOS 

3 REM COLEGIO lAVNE-BEITH CHINUCH S.PAULO 

4 REM PLOTAGEM NA PRINTER DE UMA FUNCAO ENTRE 

QUAISQUER LIMITES 

5 REM DEFINIDGS 

10 CLS:PRINT"ESTE PROGRAMA PLOTARA NA PRINTER 

UMA FUNCAO ENTRE QUAISQUER ■' 
20 PRINT"LIMITES (A E B) DEFINIDOS, COM INT 

ERVALO (I) DADO" 
30 PRINT"PARA TAL TECLE : " 
40 PRINT" 1 GOTO 110" 
50 PRINT" 110 DEF FNY(X)= (A SUA F 

UNCAO DE X) . .." 
60 PRINT" 120 A= (0 MENOR LIMITE 

DE X) " 

70 PRINT" 

DE X) 

80 PRINT" 

X) 

90 PRINT" 

100 STOP 

110 DEF FNY{X)=2*X-3 

120 A=-7 

130 B=7 

140 IF A<B THEN 170 

150 PRINT"0 VALOR DE 'A' DEVE SER MENOR DO QU 

E 'B'" 
160 STOP 
170 1=0.5 
180 L=FNY(A) 
190 U=FNY(A) 
200 FOR X=A TO B STEP I 



130 8= (O MAIOR LIMITE 



170 I=. 



RUN' 



(0 INCREMENTO DE 




210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
4 30 
4 40 
450 
460 
470 
480 
490 
500 



510 

520 

530 

540 
550 
560 
570 
5 80 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 

770 

780 



Y=FNV(X) 

IF Y-L<0 THEN 240 

GOTO 250 

GOSUB 300 

IF Y-U>0 THEN 270 

GOTO 280 

GOSUB 320 

NEXT X 

GOTO 340 

L=Y 

RETURN 

U=Y 

RETURN 

IF INT(U)-U=0 THEN 370 

U1=1NT(U)+1 

GOTO 380 

Ul=U 

L1=INT(L) 

D=U1-L1 

IF INT(D/5)-D/5=0 THEN 490 

FOR K=l TO 2 

L1=L1-1 

D=U1-L1 

IF INT(D/5)-D/5=0 THEN 490 

U1=U1+1 

D=U1-L1 

IF INT(D/5)-D/5=0 THEN 490 

NEXT K 

E=D/5 

LPRINT"V" :LPRINT"A" :LPRINT"L" :LPRINT"0" :L 

PRINT"R":LPRINT"E":LPRINT"S":LPRINT" ":LP 

RINT"D":LPRINT"E" :LPRINT" " 

LPRINT"X _ - _ - V 

ALORES DE 'Y' - -" 

LPRINTTAB(14)L1;TAB(29)L1+E*1.5;TAB(44)L1 
+E*3;TAB{59)L1+E*4.5 

LPRINT" I 1 + 

_I 1 1"; 

LPRINT" + 1" 

IF L1>0 THEN 700 

Q=INT{(-Ll)*(10/E)+.5) 

DEF FNP(Y)=INT((Y-L1) *(10/E)+.5) 

FOR X=A TO B STEP 1 

LPRINT X; 

Y=FNY(X) 

IF Y>=^0 THEN 640 

LPRINTTAB(15+FNP(Y) ) : "*";TAB (Q+15) ; "I" 

GOTO 680 

IF Y>0 THEN 670 

LPRINT TAB(Q+15) ; "*" 

GOTO 680 

LPRINT TAB(15+Q) ; "I";TAB (15+FNP (Y) ) ; "*" 

NEXT X 

GOTO 750 

FOR X=A TO B STEP I 

LPRINT X, 

Y=FNY(X) 

LPRINT TAB(INT((Y-L1) * ( 10/E) + .5) +14) ; "*" 

NEXT X 

LPRINT 

LPRINT"P.S: OS SEIS 'IS' DO EIXO 'Y' HORI 

ZONTAL CORRESPONDEM A:" 

LPRINT L1;",";L1+E;", ";L1+E*2; ",";L1+E*3; 

",";L1+E*4; ",";L1+E*5 

END 



fi 



Texto: Beatriz Carolina Gongalves 
Foto: Nelson Jurno 



A SOIOCAO DOS SEOS PROBLEM AS 
NAO E TAO SIMPLES OOANTO 
COMPRAR OM MICROCOMPOIADOR. 



Com tantos mlerocomputadores 
por ai, e preciso abrlr bem os olhos 
na hora de escolher o seu. 

Para isso basta pegar 
lapis e papel e comegar a 
perguntar. ("E a ultima 
palavra em mlero- 
computadores...") Voce 
sabe: a pressa e inimlga da 
perfeigao. E na compra por 
impulso, voce pode levar gato 
por lebre. Por isso, anallse 
todas as opgoes com Meza. 

Observe os minimos 
detalhes. Examine todas as 
caracteristicas. ("Nao requer 
prattca nem habiUdaxie-.") Ctomece 
pelo fabrlcante. 

Considere sua experiencia, o dominio 
total da tecnologia e sua esirutura 
de atendlmento de software 
e hardware. Pense na importancia 
do projeto como um todo. 

Se o desenvolvimento e proprio, e 
uma vantagem a mals, pois signiflca 
melhor conheclmento das 
condigoes de use e continuldade 
de liaha. ("Quern vai levar?...") 



Depols, anaJise detalhadamenie o produto. 

Pergunte qual a capacidade da memoria. 

Preste atengao se ele executa vanas tarefas ao 

mesm.0 tempo. Informe-se sobre as vantagens e 

^faciUdades do sistema operacional. Veja a 

qualldade dos aplicativos e as solugoes 

/ .\ que eles trarao a sua empresa 

Tome o cuidado tambem de 

conhecer tudo sobre os niveis de 

protegao e segaranga que ele 

oferece as suas informagoes. 

[^^^ ("Um aquipara o cavaJiieiro.") 

Finalmente, se a resposta 

a todas estas questoes for o 

Labo 8S2 1 , isso mostra que 

voce nao so esta por dentro 

do assunto, como acaba de 

Goncordar com um grande 

niimero de empresarios 

como voce: gente inteligente, 

consclenclosa e desconfiada 

Nao se impressione com 

apelos emoclonais: escolha 

Labo 8SS 1 . Ou voce quer 

iiiiiuii i i iy ^H continuar correndo o risco 

ASAmKlAwI ^^1 de cair no Conto do Micro? 



FUladftaABICOMP 





labo eletronlca s.a 

EscrHorla 

SAO PAUm: Av. Na^oes Unldas, 1 3797 - 

Bloc» n - 18 ° andar ■ CEP 04794 - Tel: (OU ) 

523-1144 -Telex: (011)31411 LA EL- BB 

Pmala 

RJO DE JANEIRO: Tels.: (021) 294-7946 

6 294-7644 

BRAStUA: Tels.: (061 ) 228-6239, 226-6036 

6226-6415 

CAMPINAS: Tel: (0192)52-6199 

PORTO ALEaRE:TeL: (0512)32-3922 

BELO HORJZONTE: TeL: (031 ) 224-9328 

SAO BERNARDO DO CAMPO: Tela.: (OU) 

456-70226 458-7693 

RIBEIRAO PRETO: Tel: (016)62&-2046 

PL0RIAN{5P0US:TeL: (0482)23-2972 

CnjRITIBA: Tel.: (04 1 ) 233-4733 

SALVADOR: TeL: (07 1 ) 23a2455 
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NOVO MARKETING 
DA TEXAS 

A Texas Inslrumentos esta com um novo 
sislema de vendas no qual os usuSrios dao 
suas calculadoras usadas como parte do pa- 
gameniodeumam^quinanova. Estesistema 
esta sendo feito com exclusrvidade pelas lo- 
jas da Texas para compfas d vista. Os descon- 
tos variam de acordo com o modelo e estado 
deconservagSo das calculadoras usadas. 

EM DEFESA DA RESERVA 

Desde tevereiro. a politica nacional de in- 
formatica ■ que em pouco mais de cinco anos 
conseguiu dolar o Btasil de um razoavel par- 
que industrial e lecnoiogico no setor -vem so- 
frendo uma serie de pressoes. Primeiro loi o 
documento da Camara de Comercio Ameri- 
cana, que contestava as diret rizes brasileiras 
adoladas para o setor. Depois, a Federa?ao 
das Induslf ias de Sao Paulo - Fiesp e a Confe- 
deragao Nacional da Industria - CNI enviaram 
a Secretaria Especial de Informaiica - SEI um 
documento de 1 60 linhas em que, alem de su- 
gerir a Secretaria resiringir a sua area de 
atuagao aos aspectos apenas normativos da 
PNI, aconselhava tambem a atrertura das em- 
presas nacionaisao capital est rangeiro.soba 
forma de joint-ventures, medida essa que. 
no entender dos signatanos do documento. 
faciliiana a absorgao de know-how. 

Coincideniemente, o documento da R- 
esp'CNI sutgiu iogo apos a visila do subsecre- 
lario norte-americano de Comercio, Guy Fis- 
ke. que pretendia discutir com as auloridades 
brasileiras da area a revisao da reserva de 
mercado. No enianio, nem o general Danilo 
Venturini, Secretano Geral do Conselho de 
Seguranga Nacional. nemo titular da SEI, co- 
ronei Joubert de Otiveira Brizida, receberamo 
subsecretario americano, que acabou expon- 
do suas criticas a Fiesp. 

No final de abrii, o documento da Fiesp loi 
finalmenie veiculado pela Imprensa. causan- 
do grande repercussao nos vartos segmentos 
da comunidade de Informaiica. Em reuniao 
com OS industrials paulistas, Brizida reafir- 
mou a intengao da SEI de nao alter ar sua poli- 
tica de reserva do mercado de Infof matica as 
empresas com capital 100% nacional, e va- 
fias entidades de classe, empresarios do se- 
tor e ale partidos pol'iticos manifestaram-se 
em defesa da aluagao da SEI. A Associatpao 
dos Profissionais de Processamento de Da- 
dos (APPD) de Sao Paulo, por exempio, emiliu 
nota afirmando que "a industria de Informaii- 
ca do pais, mormenie pelo falo de ser a ala- 
vanca de ouiros setores, precisa ser defendi- 
da com todo denodo, pois o dominio dessa 
tecnologia e essencial a soberania nacional". 

Da patte dos empresarios de Informatica, 
houve declarag6es como a de Isu Fang, presi- 
dente da Elebra, para quern o documento da 
Fiesp ser la uma visao de quern esta de lora. 
"As empresas privadas nacionais", argu- 
menlou Fang, "airedilaram na proposta do 
governo e investiram capital. Agora, e neces- 
sario dar continuidade a esse processo de re- 
serva de mercado para que essas mesmas 
empresas possam operar e progredir em ler- 
mos de tecnologia. A atual politica nacional 
de Informatica e satisfatdria. Devemos conti- 
nuar a imporiar tecnologia e nos associarmos 
com empresas estrangeiras nos moldes 
atuais, sem a necessidade de joint- 
ventures". 

Ja o presidents da Labo. Carlos Augusto 
Caldas. em discurso na cerimonia de langa- 
mento do prolocolo de com\jnicagao desen- 
voivido em convenio pela PUC-RJ para os 
equipamentos da sua empresa, dia 27 de 



abril, aconsethou aos estudantes; "Confiem 
na SEI. que eia esta em tx)as maos e nunca 
nos desiludiu". Prosseguindo, Caldas cilouo 
exempio do Japao. que ha 1 7 anos protege a 
sua industria, econcluiu: "Nos lemos pouco 
maisdequatroanosejahaianlagentegritan- 
do: acho que e porque nos estamos cerios". 



EXPORTAQAO (I) 

A Elebra Informatica acaba de fechar 
contraio no valor de US$ 6 milhoes e 500 mil 
com uma empresa dos EUA para a exporia- 
gao de placas eletronicas.na areade microin- 
formalica. 

Segundo o presidente da Elebra, Isu 
Fang, isso so foi possivel gragas ao apoio que 
a empresa enconirou no mercado nacional, 
onde pode se desenvolver e evoluir . atingindo 
o atual estagio de maturidade 

EXPORTAQAO (II) 

A Globus Digital devera assinar em breve 
contrato com uma errpresa norte-amencana 
para aexportagao de suas impressoras mat n- 
ciais M-1 00. de 60 colunas. A Globus ja man- 
dou quatro unidades para tiomologagao de 
venda nos EUAe.concretizadoo negocio.os 
americanos deverao comprar cerca de 500 
maqumas brasileiras por mes. 

Aqui no Brasil, a Qobus tambem esta pa- 
ra iniciar o fornecimenio de impressoras ma- 
Iriciaispat a um cliente de peso: a IBM. Segun- 
do se soube. a qualidade dos produtos ja foi 
aprovada pela IBM e o contrato devera ser as- 
sinado em breve na Secretaria Especial de In- 
formatica. 



LABO LANQA 
PROTOCOLO 

A colaboragao enire a Industria e a Uni- 
versidade acaba de dar mais um fruio: o pro- 
locolo de comunicagao para o microcompu- 
lador Labo 8221 , desenvoivido em convenio 
ent re a PUC-RJ e a LalDo Elet ronica . 

Onovo softwarepermite interligar o micro 
da labo a sistemas IBM de grande pone (em 
Remote Job Entry - RJE). ao mini Labo 8240 e 
a outros micros 8221 . sislema ja se encon- 
tra em operagao ha mais de dois meses nas 
instalagoesda Cretisui , em Sao Paulo- 

Presente ao langamento, dia 27.04 no au- 
dilorio do Rio Dataceniro. na PUC, o Secreta- 
rio de Informatica Joubert de Oliveira Brizida 
enfatizou a carencia de recursos humanos 
como um probiema "pariicularmenle grave" 
no Brasil. uma vez que, segundo disse, "a In- 
formatica depende intrlnsecamente de 
gente". EnIre as medidas tomadas pela SEI 
para contornar essa dificuldade Brizida cilou 
projelo Procomp, que procura colocar equi- 
pamentos braslleifos nas universidades para 
estimular os estudantes "a pensarem em ter- 
mos de maquinas nacionais" . 



PAPEL TERMICO 
BRASILEIRO 

A Carbex Industrias Reunidas estS lan- 
gando no mercado brasileiro o papel termico 
nas cores preio, azul, verde e vermelho. Esie 
tipo de papel e usado nas maquinas calcula- 
doras Dismac. HP. Texas e out ras. 

Com este langamenlo a Carbex retira da 
pauta dos usuanos uma maxi preocupagSo, 
pois torna desnecessaria a importagao desie 
material. 




BASE DE DADOS 

O Centro de jnformagOes Nucleates ■ CIN 
da Comtssao Nacional de Enetgia Nuclear ini- 
ciou receniemente um servigo de acesso a 
base de dados nas areas de compulagSo e 
conirole. Com informagOes da base de dados 
Inspec, da Institution ot Electrical Engineers, 
da Ingiaierra, o CIN oferece mais de 577 mil 
referencias bibliograficasde revislas e reial6- 
rios publicados em todo o mundo a partir de 
1979 Dentre os assuntos abordados encotv 
tram-se a arquitetura de hardware, lelepro- 
cessamento, lecnicas de analise. sistemas 
de gerenoamento de bancos de dados, soft- 
w/are. apticagOes etc. Essas informagOes sSo 
fornecidas mensalmenle aos assmantes sob 
a forma de sanf onas de fichas continuas con- 
lerxJo resumes feitos a partir de um perfil de 
interessepre-delerminadopelousuario. 

Os inleressados poderao cadaslrar-se no 
GIN (Rua General Severiano, 90, Botafogo - 
22294, Rio de Janeiro - RJ), ou pelo lelefone 
(021 ) 295-2232, ramal 301 , com Luis Sayao. 



LOJISTAS GAUCHOS 
CRIAM ASSOCIAQAO 

"Troca de experiencias, polHica de pre- 
gos, reivindicagdes em bloco junto aos fabri- 
cantes e manuiengao da etica acima de 
tudo". Estas sao as principals propostas da 
ARCOS - Associagao de Revendas Especiali- 
zadas em Microcomputadores. cnada em 
margo em Porto fi^egte e da qual ja fazem par- 
te maisdamelade das vintelojas do Estado. 

Ent re OS fatores que levaram estas lojas a 
formarem a ARCOS, Jose Eduardo Buchab- 
qui, Diretor da Advancing Computer Shop e 
atual Presidente da associagao, citou as difi- 
culdades que os revendedores enfrentam 
junto aos fabricantes: "Os ptazosde entrega 
nem sempre sao respeitados, vendemos um 
equipamenlo por um cerio prego e, quando 
ele chega ate n6s.o valor ja e out ro . Ouem nao 
lem condigoes de estocat fica bast ante preju- 
dicado. Alem disso. muiios fabricantes nao 
nos dao a devida assislencia em lermos de 
pubiicidade, reposigao de pegas, assessoria 
lecnica, manutengao etc. Por parte dos pro- 
prioslojistas",continua."existeofator "con- 
correncia desleal", a qual prelendemos mini- 
mizar estabelecendo uma politica de pregos 
minimos". 

Fazem parte da ARCOS a Advancing 
Computer Shop, Digital, Intormatique, Metal- 
data, Compumidia. Microtel, Unimaquinas, 
Microsis, Processa e D- B. Compuladores (!o- 
das de Porto Alegre). Somam-se a estas a Mi- 
cromega. de Novo Hamburgo. e a Alpha, de 
BenioGongalves. 



INFORMATIZAQAO 
EM MINAS GERAIS 

A Kemitron Llda , iechou contrato no ini- 
cio de margo com a Universidade Catolica de 
Minas Gerais para a venda de 32 microcom- 
putadores Naja A (Jniversidade vai fazer um 
repasse de (manciamento a baixo custo para 
OS protessores, e pretends com islo tormar 
uma comunidade mformatizada. Esta tera co- 
mo centio o campus da Universidade. onde 
sera coiocado um microcomputador Naja 
com duas unidades de disquete, doado pela 
Kemitron. juntamente com um conjunlo de 
programas para a formagao de uma biblioie- 
ca de software a qual os professores que 
compraram o sislema lerao livre acesso. Esta 
compra de 32 unidades foi o inJcio de uma se- 
rie de aqutsigoes que serao realizadas ainda 
este ano, ate que toctos os professores inle- 
ressados lenham o seu proprio equipamenlo. 



ESTATiSTICA 
PARA HP-85 

Visando dar suporte a area de estatistica, 
onde faliam programas para microcomputa- 
dores. a Foidptica langou para o HP-85. da 
Hewlett-Packard, o software Mago i, Desen- 
voivido pela MB Consuitores e Assoclados, o 
Mago I serve pa la anaiisar qualquer s6rie de 
dados mensais, para projeg^o de eventos fisi- 
cos e pregos e. tundamentalmenie. para pro- 
jegao de vendas considerando-se a sazonali- 
dade{epocas de maior e menor produgio). 

Ai6m desle progrania, a MB esla desen- 
volvendo mais dois aplicativos para o HP-85: o 
primeiro deles para analise de fluxos de caixa 
e segundo para manipuiag5ode indices {co- 
mo Of^TNs, dSlares. etc.) Desses programas 
somento o (wlago I ja se encontra a disposigao 
dosusuarios nas lojas Foldptica.ao prego de 
Cr$ 149 mil, 



U.D. MOSTRA VIDEOJOGOS 




O vjdeojogo Dactari, da Sayfl Computadores 



Os videojogos constiluiram-se numa das 
principals alragOes da 29' feira de Utilidades 
DomSslicas- U.D. reaiizada em Sao Paulo, 

Na briga pelo mercado, quatro empresas 
tomaram a dianieira: Dynacom Elelronica, 
Polyvox, Philips eSayfi.ODynavision nao esla 
sendo apresentado apenas como um jogo, 
uma vez que possui um microprocessador da 
familia 6.500. incorpora um interpretadof BA- 
SIC residente em memdria ROM de 4 kbytes 
e, atraves de um leciado aifanumerico des- 
cartavel com 56 fungOes, pode iransformar- 
se num microcomputador capaz de desenvol- 
ver, segundo a empresa, programas de naiu- 



reza cientifica, financeira ou de entreteni- 
mento. 

A Polyvox va I colocar no mercado a partir 
deprimeirodeagosloojainternacionalmente 
conhecido Atari. O Odyssey, da Philips, pos- 
sui um leciado aifanumerico integrado que 
permite a inirodugaode dados, eo Dactari, fa- 
bncado pela Sayfi Computadores, est^ sendo 
distribuido pela loja Computerland, com ga- 
ranliadeumanoeassist^ncialfecnicaperma- 
nente. Esses aparelhoscusiamentreCrl 120 
mil e Cr$ 1 60 mil, e os cartuchos com os vS- 
rios jogos estao sendo vendidos por aproxi- 
madamenteCr$ I5mil. 



COMPUTEC 

A Computec - Computagao e Assislencia 
T6cnica Llda., opera nos Eslados de Malo 
GrossoeMatoGrossodoSulnacomercializa- 
g^o de microcomputadores, maquinas contS- 
beis, pubiicagftes especializadas e suprimen- 
tos, alfem de oferecer assislencia lecnica. Os 
enderegos da empresa sSo os seguinies: Rua 
Saldanha Marinho, 198 salas 1 e 2. tel.: 383- 
1270, Campo Grande - MS e Rua Galdtno Pi- 
mentel, 14-4° andar, saia 44, tel.: 321 -2307. 
Cuiaba-MT. 



mAouina eletrica 
E impressora 

A loja Imares em Sao Paulo ja esta ven- 
dendo a maquina de escrever eletrica ET 1 21 . 
da Olivetti, com interface que a iransforma 
em impressora para microcomputadores. 
Mesmo com a interface, a ET 121 nao deixa 
de funcionar como maquma de escrever nor- 
mal. A ET 1 21 ja com a interface para adapta- 
gao a micros cusia Cr$ 999 mil. E para aque- 
les que ja tem a maquina, o prego de instala- 
gaoda interface na Imares edeCr$ 300 mil 



NOVA LOJA EM PELOTAS 

Inaugurada dia 5 de maio, em Peiotas. a 
Sistemalika - Computadores e Sistemas esta 
vendendo equipamentos da Microdigtlal, 
Poiymax. Proldgica, Schumec, Uriiiron e 
Spectrum Na area de software a empresa 
oferece pacotes de aplicag6es comerciais 
em BASIC e COBOL, programas para ouiras 
areas em BASIC e diversos jogos A Sislema- 
lika tambem presia servigos de compu!ag5o 
em equipamenlo Poly 201 DP, incluindo anali- 
se. programagao, processamenlo e desen- 
volvimeniodesislemassobencomenda. 

A empresa mimstra cufsos de BASIC, 
com aulas leSncas e praiicas. e vende supri- 
mentos da Memphis e lormularios Rediform. 
O enderego e: Rua Andrade Neves, 2418 - 
96100-Pelotas-RS 



COMPUBEL 

Belfem do Para la conia, desde o inicio de 
maio. com uma nova loja especiaiizada em 
microcomputadores: a Compubel - Compula- 
dores, Sistemas e Supr imentos Ltda. Deacor- 
do com diretor Luiz Fernando Del Gaib, a 
empresa dara "enfase especial" para os sis- 
temas de uso pessoal . 

Os principals produtos comercializados 
sao OS da Microdigiial, Proldgica. Spectrum, 
Unltron. Digitus, Sysdata, Naja e loda a linha 
de computadores fabricados pela SID. 

Alem do hardware, a loja comercializa to- 
dos OS lipos de suprimentos para compulado- 
res e atua nas areas de cursos e Ireinamenio. 
O enderego da Compubel e- Av. Quinimo Bo- 
caiuva, 1 779, Tel.: (091 } 223-631 9 



SUPPLY 



EM PD, TUDO 

O QUE VOCfe 

NECESSITA NUM 

S6 FORNECEDORI 

E a Sapply n&o tem apenas lodo e qualquer II- 
po de material para CPD's, Tem lamb^m os 
melhoies pregos e a mais rAplda enirega. Isso 
porque a Supply tem umestoquecompleio das 
melhores marc as exlstentes no mercado, po- 
dendo assim atender — com a mesma eficlta- 
cia — desde empresas de grande porte at£ pe- 
quenosconsumldores. 

Seoseu probiema (or suprimentos para Proces- 
samento de Dados, prego ou prazo de entrega, 
consulte antes a Sapply. 

Voct far* bons nasdcloa « bona aHlso*. 



m!>$uppn 



Suprimenlos e Equipamentos para Proces- 
samento de Dados Ltda. 
Rua Padre Leandro, 70 — Fonseca 
CEP 24120 — Tel.: 722-7937 Niterdi — RJ. 



OUTROS ESTADOS: 

Pernambuco, Rio Grande do Norle • Parai- 
ba: Filial Recife: {061) 431-0569 — Alagoas: 
CORTEC: (082) 221-5421 — Ceara: DATA- 
PRINT: (085) 226-9328 — MaloGrosso: FOR- 
TALEZA: (067) 382-0173 
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Para o pequeno e medio empresario, um programa que calcula redes PERT em microcomputadores. 



Figura 1 — Aplicagao do PERT na 
imp/antafSo de um s'tstema de mi- 
croondas. 



Calculos PERT em BASIC 



t^cnica PERT/CPM tem 

sido uma ferramenta de 

grande utilidade no plane- 

jamento e controle de obras que 
envolvem varias atividades interde- 
pendentes. 

Sua aplicagao, no entanto, tem 
sido restrita as grandes empresas 
que dispoem de pessoal especiali- 
zado e de um CPD, uma vez que a 
utiliza^ao do PERT pelo pequeno 
e medio empresario - atraves de 
bureaux de serviqos — al^m de cus- 
tos aitos, implica em uma defasa- 
gem muito grande entre o instan- 
ts em que as reprogramagoes de 
prazos ocorrem e a efetiva emissao 
dos relatorios. Isto limlta muito a 
utilidade do sistema, gerando de- 
sinteresse por parte do gerente do 
projeto que, na maioria das vezes, 
se ve obrigado a manter cronogra- 
mas e controles paralelos, elabora- 
dos manualmente. 

Com o advento dos micros, estas 
dificuldades podem ser superadas, 
aproximando a t^cnica P£RT dos 
pequenos projetos e empresas. 

Este artigo apresenta um pro- 
grama simples de c^lculo de rede 
PERT para uso em micros, desen- 
volvldo em linguagem BASIC no 
Sistema 700 da Prol6gica. Foram 
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empregados os seguintes dados de 
entrada: 

1 — Numero de atividades envol- 
vldas 

2 — Dura(?ao total desejada para 
projeto 

3 — Nome e durapao de cada ativi- 
dade 

4 — Matriz de interdependencia 
(rede PERT) 

Na forma como esta apresenta- 
do, programa exige que se entre 
com estes dados a cada rodada, o 
que pode se tornar tarefa traba- 
Ihosa e enfadonha. Porem, os 
usuarios que dispuserem de facili- 
dades de uso de arquivos poderao 
fazer algumas adaptapoes, de mo- 
do que a entrada de dados seja efe- 
tuada uma unica vez em cada pro- 
jeto, deixando apenas as atualiza- 
g5es especi'ficas para serem feitas 
na medida do necessario. 

Como relatorio de sai'da, sao 
fornecidos: 

• cronograma de barras; 

• data de ini'cio, termino tarde e 
folga das atividades; 

• caminho cn'tico. 

Como exempio de aplicapao te- 
mos, ilustrada na figura 1 , uma re- 
de que representa as atividades de 
implanta<?ao de um sistema de te- 



lecomunicagoes (rota de microon- 
das). 

A entrada da matriz de depen- 
dencia e feita simplesmente pela 
definigao dos pares {l,J), onde 1 
representa uma atividade da qual a 
atividade J depende diretamente. 
Neste exempio, OS pares sao: 

(1.*) (*,5) (5.6) (6,7) 

(7.8) (8,13) (13,19) 
(19,20) (20,25) (25,26) 
(26,28) (28,30) (30,31) (31,32) 

(8.9) (9,23) (23,26) 

(8.10) (10,22) (22,23) 
(8,12) (12,19) (18,21) (21,22) 
(21,27) (27,28) 

(8.11) (11,15) (15,17) 
(17,18) (17,24) (24,27) 
(8,14) (14,16) (16,17) (16,21) 
(1.3) (3,28) (1,2) (2,31) 
(1,29) (29,32) 

Apos a entrada do ultimo par 
de dependencia, deve-se entrar 
com par (0,0) para dar continui- 
dade a execupao do programa. As 
figuras 2 e 3 mostram os relato- 
rios de sai'da. Caso resultem fol- 
gas negativas, deverao ser revistas 
as duragoes de algumas atividades 
ou a duratpao desejada para o to- 
tal do projeto. 
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^^H - CAMtNHO CRITICO 
T= DURAQAO EM SEMANAS 

QUADRO DE ATIVIDADES 



15 
16 
17 

18 

19 

20 

2 t 
22 

23 
24 
25 
26 
I? 



- Eatudos preliBin«rea (2 aeB«ii««) 

- TreinaBCDto (te pessoal para BaauCentao (31 seaanas) 

- TreiDAHeuto de pessoal para ■aBatea^ao (9 seaanss) 

- Testes de visibilidadc direta (S seaanas) 

- Teste de propagacao (5 sCBsaas) 

- Aquisi;so de cerreoo (9 aeaaaas) 

- Locagao de escradas de aceBso e rotas 
do cabo coaxial (5 semanaa) 

- Emissao de projetos (7 aeaanas) 

- CoDCorreacia para squisi^ao de eqpto- 
ladio (21 seNanas) 

- Idea pars eqpto. coaxial <2I aeaanaa) 

- Idea para constru^ao das estradas e 
terraplanagea < 7 aeaaaas) 

- Idea para consCru^ao de predios (7 seaaoaa) 

- Idea para construgao das torres (7 aeaanaa) 

- Idea para const ru(ao de linhaa d« 
transaissao e forneciaento e ioatala- 
fso de for^a e energia (7 seaanas) 

- Conatru;ao das estradas de acesso e 
terrapLanagea (9 seaanas) 

- Const ru;ao das linhas de traaaaiaaao 
e terra (3 seManas ) 

- Constru^ao das linhas de dutoa para 
cabo coaxial (17 aeaaaas) 

- Construfao dos predios ( 12 seaanas) 

- Enaaios de galvanisacao das torres 
(fabrics) - (2 seaanas) 

- Hontagea das torres (3 seaanas) 

- Ia8tals;ao do eqpto. coaxial (5 seaanas) 

- Inacalacao do eqpto. de for;s de 
eaergencia (3 seaanas) 

- Inatala^ao de eqpro. Kadio (7 aeaanas) 

- Instala^ao do coaxial (cabo) - (9 seaanas) 

- Instala^Bo de antenas e guiaa de onda (3 seaanas) 

- Alinhaaento do sisteaa Radio (9 seaanas) 

- Al inhaaeato do sisteaa coaxial (5 seaanas ) 



28 - Testes de aceita^ao (3 aeaaoas) 

29 - Aquiai^ao de iaoveis, viaturas e 

iostruaenCal (32 seaanas) 

30 - Iaterliga;aa coa aa estagoes locais (2 seaanas) 

31 - Entrada ea trafego (PFP) - (1 seaana) 

32 - Inaugura^ao ( I seaana) 
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ComSfcio e Represenlagies Uda. 



SOFTWARE DISPONIVEL 



— Contabilidade Geral 

— Contas a Pagar 

— Contas a Receber 

— Arquivos/Mala Direta 

— Editor de Textos 

— Foiha de Pagamento 

— Administra<;ao de Im6veis 

— PERT/CPM 

— Sistema Estatistlco 

— Consultor 

— Visicalc 

— Visidex 

— Utilit^rios 

E vfirios Outros 



APPLE/TRS-80/aNITROM/POLYMAX 
MICROENGENHO/NAJA/DGT100/CP500 

L.H.M. SOFTWARE & HARDWARE 
Av. Franklin Roosevelt. 23 Grupo 1203 
Tel.: 262-5437 - Cep. 20.021 - R.J. 



cAlculo pert em basic 



TOMADADE DECISOES 

Nosso programa podera ser de 
grande valia para o gerenciamento 
de pequenos e medios projetos. A 
facilidade de acesso e rapidez das 
respostas aumenta muito a utilida- 
de do sistema de planejamento e 
controle, possibilitando simula- 
goes que permitem ao gerente uma 
avaliagao imedtata das implicagoes 
de eventuais mudangas de prazos. 
sistema torna-se, assim, valioso 
instrumento de tomada de deci- 
s5es. 

Deve-se ressaltar, final mente, 
que objetivo deste trabalho foi o 
de apresentar apenas um algoritmo 
b^sico de calculo, de uso generico, 
e nao um sistema complete para 
determinada aplicag:ao. Adapta- 
poes e melhorias, com base em ne- 
cessidades especiais, notadamente 
quanto a entrada de dados e tipos 
de relat6rios de sai'da, poderao ser 
feitas pelo proprio usuario, bastan- 
do para isso o conhecimento da 
llnguagem BASIC. 



Ademir Castilho Piqueira 4 Engenheiro Ele- 
trdnico formado pelo ITA. Atualmente 4 Di- 
retor Comercial da SEICOM - Servigos. En- 
genharia e InstalaoSo de Comunica^Ses S/A. 
William Noriaki Uemara 4 Engenheiro de 
Produgao formado pela fEl, e responsive! pe- 
la 4rea de Planejamento e Controle da mesma 
gmpresa. 
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TREINAM II 


9 
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93 




TEST VISIB 
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Figura 2 - Relatdrio de sai'da (1). 



I EST PBELIH 
Z TREINAM 1 

3 TRBIMAM II 

4 TEST VIBIB 

5 PROPAC 

6 AQDIS TERBEHO 

7 LOCAC ACESSO 

8 PROJETOS 

9 COHC RD 

10 COHC COAX 

II COHC ACKSSO 
12 cone PBEDIO 
15 COHST TORRE 
\t, COHST LT/CH 

15 COHST ACESSO 

16 COHST LT 

17 CONST DUT COA 

18 COHST PRED 

19 EHS TORR 

20 MOHT TORR 

11 IHST COA 

21 IHST FOBC 

23 IHST RP 

24 IHST COA 

25 IHST ABT 

26 ALIR BD 

27 ALtHH COAX 
Z8 ACEITACAO 

29 Aq IHSTR/IMOV 
10 IHTEHLIC LOC 
3 1 EHTB TBAP 
32 IHAUCUR 



CKDKOCRAHA 



ccccccccc 



ccccccc 



**••••**••**••****••• 



ccccccc 
■•■•*** 



ccccccccc 



GCCCCCCCCCCCCCCCC 



cccccccccccc 



••**«••*• 



ccccccc 



ccccccccc 



(c)-ATIVIDADE CRITICA 



DUBACAO: 1 1 I SEMAHAS 



CURSOS DE APERFEICOAMENTO TICNICOS 





Figura 3 - Relatdrio de sai'da (2). 



SHOP COMPUTER CEDMLTDA. 

Especial izada em vendas de Microcomputadores, 
Disquetes, Progranias Aplicativos, Livros e RevJstas 
T6cnicas, Oferecemos ainda Assistfincia Tfecnica e Cur- 
sos. Atendemos lambfem pelo reembolso postal. 

Av. S^o Paulo. 718 - Fone (0432) 23-9674 

CEP 86.100 - Londrina - PR. 



Av. Sao Paulo, 718 - Fone (0432) 23-9674 

Caixa Postal, 1642 - CEP 86.100 - Londrina - PR. 

( ) CURSO DE ELETROnICA DIGITAL E MICROPROCESSADORES 

{ ) CURSO DE ELETROnICA E AuDIO 

( ) CURSO DE PROGRAMACAO EM BASIC 



Nome. . . 
I Endere(;o. 
I Bairro. . . 
I CEP. . . . 



.Cidade Estado. 



J 
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CALCULO PERT EM BASIC 



C^lculo Rede PERT 




10 PRINT (:HR*(12) 




20 INPUT "NUMERO DE ATIUIDADES" ; ANA 




30 DIM B(ANArANA) :DIM T<ANA):DIM T1(ANA):DIM T2(ANA) 




HO DIH AT«(ANA) 




50 FOR 1=1 TO ANA 




60 T1(I)=0:T2(I)=10000 




70 FOR J=i TO ANA 




80 e<l,J)=0 




90 NEXT J 




100 NEXT I 




110 INPUT "DURACAO TOTAL DO PROJETO: " - T2< ANA ) 




120 PRINT :PRINT "»»FACA PRECEDENTE=0 E CONSEOUENTE=0 P/PARAR INCLUBAO»»" 




130 PRINT:INPUT "ATIVIDADE PRECEDENTE: *M s INPUT "ATIUIDADE CONSEQUENTE: " , J 




mo IF 1=0 AND J=0 GOTO 180 




150 B(l7J)=l 




160 GOTO 130 




170 PRINT 




180 FOR 1=1 TD ANA 




190 PRINT "NOME DA ATIVIDADEs 'M : INPUT AT*<I) 




200 PRINT "DURACAO ATI VIDADE: 'M : INPUT T<I) 




210 NEXT I 




220 REM CALCULO INICIO CEDO 




230 FOR 1=1 TO ANA 




2M0 FOR K=l TO <I-1) 




250 IF B<K,I)=0 GOTO 290 




260 IF (T1(K)+T<K) )>T1(I) GOTO 280 




270 GOTO 290 




280 T1<I)=(T1(K)+T(K)) 




290 NEXT K 




300 NEXT I 




310 REM CALCULO TERMING TARDE 




320 FOR L=0 TO <ANA-1) 




330 I=ANA-L 




3M0 FOR K=I+1 TO ANA 




350 IF £!(I,K)=0 GOTO 390 




360 IF <T2<K)-T<K) )<T2(I) GOTO 380 




370 GOTO 390 




380 T2(I)=(T2(K)-T(K)) 




390 NEXT K 




MOO NEXT L 




mo REM "EMISSAO DE RELATORIOS" 




420 LPRINT "SEICOM-SERV ENG INST COMUNICACOES SA" 




M30 LPRINTsLPRINT "ATIVIDADE" . "DURACAO" - "IN CEDO" r "TERMIN". "FDLGA" 




MMO LPRINT :FOR 1= 1 TO ANA 




M50 LPRINT AT$<I),T(I),T1(I),T2<I) . :G0BUE: M80 




460 NEXT I 




M70 GOTO 500 




480 IF <T2(I)-T1(I) )=T<I) THEN LPRINT "ATIV CRITICA": RETURN 




490 LPRINT (<T2(I)-T1(I))-T(I)) : RETURN 




500 PRINT "ARRUME A IMPRESSORA E TECLE <S> P/CONTINUAR" 




510 VA»=INKEY* : IF VA$< >"S" GOTO 510 




520 REM "IMPREBSAD CRDNOGRAMA"' 




530 X»=STRINGt(T2cANA)r"*f") : Y«=STRING*(T2< ANA) , "c " ) 




540 LPRINT TAe(50) "SEICOM-SERV ENG INST COMUNICACOES SA" 




550 LPRINT :LPRINT TAE:(60) "CRONOGRAM A" 




560 FOR I = 1 TO ANA 




570 IF <T2<I)-T1(I) )=T(I) GOTO 590 




580 LPRINT I AT*(I) TAB<20+T1<I)) MID* ( X$ . 1 1 ( I )+l , T ( I ) ) :GOTO 600 




590 LPRINT I AT«<I) TAB< 20+Tl < I ) > MID«< Y*. T 1 ( I)+l ,T < I ) ) 




600 NEXT 




610 LPRINTsLPRINT " ( c) -ATIOIDADE CRITICA" TAP(60 ) "DURACAO : SEMANAS" 


S 





28 



MICRO SISTEMAS, junho/BS 




Participe da era da 

Informatica 
CP-500 c CP-200 



PROMOgAO ESPECIAL 



Cataeiarltticai Ucnien 
* CPU com microprocsuBiloi 

~ Z80 de 3 MHt - M«(n6r'ia ptincipal d* 
'48 KB - Vidoodell? • 16 linhM com 54 col 
- 16 linh*icam32colunBt. 
^ ''* Modo gr^fko com 48 ■ iTSponiot - Ttclwlo >lf«num«ri- 
co • numtrico rsduzido — D* 1 ■ 4 unidadm ds diico llaxiVsl d* 
5 1 14" - Intlrlwn; paralala • Mral |R5 23ZC) ~ Conaxfc d* canet* d« 
Audio — Impmiofa dc 100 CPS — Unf^agBm Baiic midenla am ROM dt 1 6 KB. 



SOFTWARE 



CaocMr lilieai ticnicM 

* Iniarpratadof da Llnguagem BASIC 
taiidanta am ROM dc 8 Kbviai. * Micioprocai 
lodo' Z80 Ada3£MHz. • Mam6(ia RAM da 16 Kbvtai. 
9 Tacfado com 40 laclai conlando 1&4 tun^Oai, imHuaiv* matamiiicai a cianirlicai.TacIa 
para cada comanilo ou tun^to da llnguagam BASIC. • FurxAn SLOW. RESET a BELL 
• At4 doit JOY STICK para voce iooir com o CP 200, * OimaniCaiJ All, 7 on - 

Lorg. 40 em - Pcot. 21 em. 



JOGOS: 

BATALHA AEREA 
CP-200 (F). 2.300,00 

■ CP-500 (F/D) 3.000,00-' 
BATALHA NAVAL 

CP-200 (F). 4.800,00 
FORCA 

- CP-200 (F). 3.300,00 
-CP-500 (F/DI 3.500,00* 
TIRO AO ALVO 
-CP-200 (F). 2.300,00 

CP-500 (F/D) 3.000,00* 
BIORRITMO 

- CP-200 (FJ. 2.300,00 
LOTO 

-CP-200 (Fl. 2.800,00 
TABUADA 

- CP-200 (F). 2.300,00 

■ CP-500 (F/Dl 2.800,00 -^ 
SIMULADOR DE VOO 

CP-200 (F). 5.000,00 
COMANDO UFO 
CP-200 (F). 2.500.00 

- CP-500 (F/D) 4.000,00"- 
OESTESELVAGEM 

CP-200 (Fl. 3.500,00 
SENHA 

CP-200 (F) . 4.000,00 
INVASAOCOSMICA 

- CP-200 (F I. 4.500,00 

SOMENTE P/CP-500 
PATRULHA (F/D) 

5.000,00* 

INVASORES(F/D) 

4.500,00* 

PADDLE PINBALL (F) 
Simula jogo de fliperama 
8.000,00 

DISCOS VOADORES(F) 
Conirole o canhSo para 
abate-los .... 8.000,00 



DANCING DEMOND (F/ 
Dl - Incn'vel demoninho 
dani;arino . . 8.000,00'^' 
XADRE2 (F/D) 
6 nfveis que vSo desafia- 

lo 10.000.00* 

CUBO (F/D) 

Voce nunca resolveu o 

cubo? A solupao 6 cube - 

5.000,00* 

JOGOS EM BASIC (F/D) 
Enorme variedade: boe, 
skv. pouso lunar, Jorna- 
da teaser, cupim, asteroi- 
des, vitoria, paciencia, 
hopper, cram, fireman, 
spacefire (cadal ... 

3.000,00'=' 

PROIWOgOES 

P ACOTE ECONOM ICO 

(F) 

Para CP-200 NE-Z8000, 

com musica, damas, ga- 

mSo, conta corrente e 

controle de estoque . . i^. 

2.500.00 

10 JOGOS EM DISCO 
Para CP-500, variedade: 
boa. sky, pouso lunar. 
Jornada, teaser, cupim, 
hopper, cram, fireman, 
spacefire . . . 20.0(30,00 

APLICATIVOS 
SOMENTE P/CP-200 (F) 
CONTAS A PAGAR 
Conirola o acumulado do 
mes. ano e operagfies e 
poupanga . . 12.000,00 
AGENDA 

Trabaiha com dois tipos 
de informagao atJvldade e 
telefone .... 8.000,00 



CADASTRO DE CLIENTE BANNER (F/O/l) 



Cadastra p/clienie a razSo 
social, rua, bairro, cid.. 
est., CEP., tel., produto 
adquirido, data da aqur- 
sicab ..... 12.500,00 
VllDEO-TlTULO 
Cria I I'tulos para video-ta- 
pes, inclusive com movi- 
memos .... 15.000,00 
VUCALC 

Destina-se a execupfo de 
.c^lculos sobre uma plani- 

Iha 10.000,00 

SOMENTE P/CP-500 
CADASTRO DE CLtEN- 
TES (D) . . . 20ORTN 
MALA-DIRETA (D/l) 
Srstema de mala drreta 
permitindo a ImpressSo 
de etiquetas utilizando 
ou nSb chave de acesso 

40.000,00 

FINANgAS (D) 
Engloba fun<;:de5 de juros 
compostos, analisedepre- 
co de venda e rendimen- 
tos, taxas de retorno. ta- 
bela de amortizaqSb, sal- 
do hipotec^rio, pagamen- 
losaprazo . 40.000,00 
PROCALC (Dl 
Destina-se a execugao de 
calculos sobre uma pla- 
nilhg .... 120,000,00 
Vlt)EO (F/D) 
Editor grafico da tela. 
Desenhe com facilidade 
no CP-5(X). Armazena as 
telas em fita ou diskette 

10.000,00* 



Imprime mensagens em 
letras garrafais (80 col.) 

5.000,00^ 

SCRIPY /F/l) 
Complete e versatil pro- 
cessador de lexto 

20.000,00 

CONTROLE DE AQOES 

ID/Fl 

Para quem gosta da Bol- 

sa. Mostra os resuliados 

(Lucro/Perdal totals e 

parciais conforme cota- 

(^ 5.000,00-* 

DIRETORIO (Dl 
Organiza e cadastra todos 
OS seus programasearqui- 
vos em diskette automa- 
ticamente. Pesquisa por 
disco ou programa e po- 
de imprimir ordenada- 
mente .... 15.000,00 

BANCO DE DADOS 
ID/I) 

Sistema de fich^rio ele- 
tronico. Voce mesmo cria 
as f ichas e pode pesquisar 
de v^rios modos, al6m de 
permitir impressao. Simi- 
lar ao Profile 35.000,00 

CARTA ASTRAL (F/l) 
Esie programa faz todos 
OS calculos necess^riosao 
desenho de uma carta as- 
tral e ainda imprime a 
mesma em quesiao de mi- 
nuios. S6 nSo interpreta . 
15.000,00 



UTILITARIOS 
(SOMENTE P/CP-500) 
CONVERT (F/Dl 
Convene numeros deci- 
mals e hexa. Pode ser 
chamado a qualquer Ins- 
tante e nab atrapalha o 
BASIC . . , , 6.000,00* 
LISTA (D/ll 

Imprime as listagens de 
programas em BASIC de 
forma limpa e organiza- 
da. N3o se perca com 
LLIST .... 10.000,00 
SUPERTECLA (F) 
Cada tecia de ssu CP- 
500 representa duaspala- 
vras do BASIC al6m de 
seu valor normal. Reduz 
drasticamente o tempo 
gasto na teclagem de pro- 
gramas 6.000^)0 

ODONTO (F/D) 
Engloba setor financeiro, 
agenda, cadastro, mala di- 
reta, lay-out dentario . . 

50 0RTN 

EDITOR (0) 
Poderoso editor assem- 
bler para os que progra- 
mam em linguagem de 
miquina. Manual c/instru- 

pfies 25.000,001: 

SOUND (F/Dl , 

Pequena mas Otil subro- 
tina que cria uma nova 
palavra em BASIC — 
"SOUND-. InstrupSes 
detalhadas de como co- 
loca-la em seus progra- 



F - Para CP-500 ou CP-200 em fita. 
D - Para CP-500 em disco. 



. . . . 15.000,00 I mas 3.000,00* 



I ■ Requer impressora. 

'^ - Acrescentar CrS 4.000,00 p/versao em disco 



filcres 



Filers) lm(»rts(Jo a Rapiaiantacoat Ltda. 

flua Aurora. 165 - CEP 01209 - SSo Paulo - SP 
Tele> 1131298 FILG BR - PBX 223 7388 - Ramais 2. 4. 
12, 18, 19 - Direioi 2231446. 222 3458, 220 5794 a 
220-9113 -Rafmbolio- R17 Direio 222-0016. 220-771B 



NOME TEL 

END CEP 

CID EST EQUIP 

ENVIE AS INFORMACOES ACIMA PARA FILCRES IMP. E REPR . LTDA. 

■ ■■ ■■■t ■■-■■■■ ■■-■■■■ 



Uma analise das principals diferen^as entre a linguagem 
da calculadora HP-41Cea linguagem BASIC. 



HP -410 e BASIC: uma comparagao 



Hi/ton Fe/icio dos Santos 



Acrescente miniaturizapao dos micros pessoais 
OS tornou quase tao pequenos quanto as cal- 
culadoras programaveis. Embora os objetivos 

a serem alcantpados com ambos equipamentos sejam 
muitas vezes os mesmos, existem importantes diferen- 
gas. 

Um programa para uma calculadora program^vel ^ 
bastante semelhante as operapoes que se faz para a 
execu(pao de um calculo manualmente. A maior dife- 
renga d que as decisoes logicas, deixadas ao operador 
numa solugao nao automatica, passam a integrar a 
memoria de programatpao da calculadora. 

Ao se rodar o programa, as operagoes sao executa- 
das na sequencia planejada pelo programador, sendo 
ainda possivel o percurso de diversas sequencias al- 
ternativas de calculo, de acordo com os resultadosde 
operagoes anteriores ja realizadas. 

Um programa feito para o micro tern, essencial- 
mente, as mesmas caracteristicas. que os distingue, 
principalmente, e o ni'vel da linguagem utilizada para 
usuario programar a maquina: na calculadora, trata- 
se de uma linguagem em que todas as fungoes a serem 
executadas (operagoes aritmeticas, armazenagem e 
recuperapao de dados de registros, compara(;^o de 
valores numericos — ou mesmo alfa-num^ricos — e 
execugao consequente de outras rotinas de calculo) 
sao especificadas minuciosamente, passo a passo. 
Ja na linguagem de alto ni'vel (como BASIC, COBOL 
etc.), usada para programagao em micros, a instru- 
pao e muitas vezes simplificada a especificapao do 
seu objetivo. 

CALCULADORA X BASIC 

Consideremos, por exempio, um loop (numero de- 
terminado de repetipoes de uma mesma sequencia de 
operapoes) muito simples, e a forma de conta-lo na 
calculadora e no mi^ocomputador. Numa calculado- 



ra programavel como a HP-41C, para fazer um progra- 
ma para executar a soma de cinco numeros, deve-se 
especificar na memoria de programapao da maquina 
a seguinte sequencia de instrupoes: 



01 
02 
03 

04 

05 

06 
07 

08 



LBL'^ SOMA 
1,005 
STO 00 



[ 



CLX 
LBL 00 

""nOmero? 

PROMPT 



09 



ISG 00 



10 


GTO 00 


11 


TOTAL = 


12 


ARCL X 


13 


AVIEW 



14 



END 



No registro 00 sera armaze- 
nado (STO 00 - store 00) o 
contador 1,005 
o registro X(inostrador da ma- 
quina) e zerado (clear X) 
titulo da retina do loop: la- 
bel ou rotulo 00 

este comando faz com que sur- 
ja no visor a pergunta aciraa. 
Na l5 execu9ao do loop o va- 
lor zero e somado ao introdu- 
zido como resposta ao quesito 
do passo 06 . Nas execu^oes se 
guintes , os valores sucessiva 
vamente introduzidos em 06, ~ 
sao somados ao sub-total que 
esta sendo acumulado no mos- 
trador , 

Esta fun^ao (increment skip 
if greater = aumente e salte 
quando for maior) faz com que, 
a cada passagem pelo loop, 
uma unidade seja acrescida ao 
numero guardado no registro 
00; quando la for atingido o 
valor 6,005, a instru^ao se- 
guinte GTO 00 (go to 00 - vi 
ao label 00) sera saltada; o 
loop tera sido executado 5 
vezes entao. 



estas duas instru9oe3 colocam 
no visor, apos o titulo TOTAL 
= o resultado da soma dos cin 
CO numeros . 
£lin do programa. 



Uma vez guardada esta sequencia de instrupoes na 
memoria de programapao da calculadora, cinco nume- 
ros podem ser introduzidos sucessivamente quando o 
processamento parar no passo 07 (PROMPT). A cada 
instrupao, pressiona-se R/S (run/stop) e quando for 
inserido o ultimo numero, o total serci rotuladoeex- 
posto no visor da maquina: TOTAL = ... 

Este programa, muito simples para se usar numa 
calculadora programavel, serve para ilustraroqueeum 
loop (lapo ou sequencia repetida das mesmas opera- 
goes, neste exempio apenas uma, a de somar), e como 
se pode pr^-determinar quantas vezes deve ser auto- 
maticamente executado. 

Num TK82-C, por exempio, este mesmo programa 
seria escrito (de acordo com o manual do equipamen- 
to), desta forma; 



10 LET TOTAL = 

Na varlavel sera guardado o total 
20 FOR C = 1 TO 5 

contador C variara de 1 ate 5 
30 INPUT A 

Pede a introdu^ao da parcela A 
40 REM C = NOMERO DE VEZES EM QtJE FOI DIGITA- 
DO 

fi uma nota que lerabra ao usuario o que sl- 

gnifica o contador C: serve para futuras e 

xecu9oes do programa como lembrete; nao a- 

feta a execu^ao. 
50 LET TOTAL = TOTAL + A 

Fara com que cada parcela A que for intro- 

duzida seja somada ao TOTAL que ate entao 

tenha sldo acumulado. 
60 NEXT C 

Fara com que o valor seguinte seja assuml- 

do pela variavel C 
80 PRINT TOTAL 

Imprimira o total da soma quando C = 5, se 

gundo instruido em 20, 



Comparando-se a linguagem BASIC e a linguagem 
da calculadora, nota-se que as instrupoes para a HP- 
41 C numeros 02, 03, 05, 09 e 10 (1,005/STO 00/LBL 
00/ISG 00/GTO 00) foram substitui'das pelas linhas 
20 e 40 (definipao do contador) e 60 (acrescimo de 
uma unidade ao contador). 

A origem e o fim do loop nao precisam ser tao cla- 
ramente definidos em BASIC como foram na HP-41C 
(LBL 00, GTO 00). As vezes, pode ocorrer o contra- 
rio, com a sequencia de instrupoes em BASIC bem 
mais elaborada do que a aplicapao dos recursos ofe- 
recidos por uma calculadora programavel como a 
HP-41C. 

Na maioria dos microcomputadores, se quisermos 
determinar, por exempio, o resto de uma divisao, te- 



mos que realizar um artif I'cio de calculosem BASIC, 
ao passo que na HP-41C bastaria executar a funpao 
MOD (modulo) sobre os dois operandos. Numa divi- 
sao de 30 por 7, em BASIC, teri'amos: 



10 Q = INT (x/y) 

Toma-se a parte inteira de 50/7 ou seja Q 

= 4, 
20R = X-y*Q 

Realiza R= 30 -7*4=2 



Na HP-41C, supondo-se, como no primeiro caso, 
que OS operandos 30 e 7 ja tenham sido introduzidos, 
bastaria executar a funpao MOD e no visor aparece- 
ria 2, que 6 o resto da divisao de 30 por 7. 

Em alguns casos, os artifi'cios necessdrios em BA- 
SIC sao bastante sofisticados, como no calculo das 
funpoes trigonometricas inversas do seno, co-seno e 
tangente (1), pois o calculo direto destas funpoes nao 
est^ dispom'vel na maioria dos micros (embora o 
computador de bolso americano PC-1500, da Sharp, 
possua as funpoes sin-' e cos"' (2)). Este calculo em 
BASIC seria: 



ABC SIN (X) 

DEF FN ASN (X) = 180 * ATN (X/SQR (1 - X * X 

+ (ABS (X) =1)) ) + 45 * X 

* (ABS (X) = 1 ) 



para X em radianos e para o angulo entre -90o e 
■h90Q 



ARC COS (X) 

DEF FN ACS (X) = 



- FN ASN (X) -t- 90 



para X em radianos e para o angulo entre OOe 180Q 



ARC TAN (Y,X) 
DEF FN + XY (U) 



180 * (ATN (Y/(X -f (X = 
)) )/+ 1 + (X = 0) +1)) 
- 135 * Y * (X = 0) 



onde U e uma variavel "dummy" e o angulo estd en- 
tre 0Oe360o. 



M 

'^■^J^MICROMAQ 



M 



A MICROMAQ k a mais nova loja especializada em Micro 
Computadores, Software, Acess6rios, Treinamento, Livros, 
Revistas e Manuten^o em Equipamentos Nacionais e Estran- 
ge! ros. 

RuaSeiedeSetembron?92 Loja106 Centra TeL:222-6088 RiodeJaneiro RJ 
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HP-41C E BASIC: UMA COMPARAgAO 



goes sao feitas 
COS-' eTANG". 
gulares X,Y para 



Em muitos BASICs, as operapoes I6gicas tern como 
resultado verdadeiro o valor -1, ao contrario de 1- 
Nestes tres exemplos, os operadores booleanos lidam 
com a divisao per zero e com raizes quadradas de 
numeros negatives. A ultima expressao pode ser 
usada para achar o angulo em uma conversao de 
coordenadas retangulares para polares. 

Na calculadora programavei HP-41C, as tres fun- 
diretamente pelas teclas SIN-' , 
A conversao de coordenadas retan- 
polares r, e tamb^m e direta, 
mediante o comando R-P: a grandeza r 6 colocada 
no mostrador, e pressionando-se a tecia X t y sur- 
ge angulo a . 

O FATOR TEMPO - 

Um programa em BASIC tem, normalmente, sua 
execugao mais lenta que o mesmo programa feito em 
linguagem de maquina, desde que se use o mesmo 
equipamento. Evidentemente, entre uma calculadora 
programavei e um microcomputador nao ha discus- 
sao: micro e dezenasde vezes mais rapido, indepen- 
dentemente da linguagem usada na programapao. 

A melhor forma de ilustrar esta relapao de tempo 
entre a calculadora programavei e o micro ^ atraves da 
comparacao dos tempos de execugao pelo micro 
HP-85 e a calculadora HP-41C, em um programa de 



QCAMPUSWARE 

OS MAIS IMPORTANTES LANCAMENTOS 
EM LIVROS DE COMPUTAQAO 

• BASIC PARA MICROS PESSOAIS (Novidade) 

J.C.PereiraFilho. 232pp.,CrS 3.100.00 

• 1NTR0DU(;A0 ao VISICALC (Novidade) 

E.A.Garbin, I32pp..Cr$ 2.460,00 

• CRIAN^A TAMBEM FAZ PROGRAMAS (Novidade) 

J.A.M.Silva,84pp.,CrS 1.550.00 

• BASIC BASICO (4?Edifao) 

J.C. Pereira Filho. 248 pp.. CrS 4.610.00 

• GUIA PARA PROGRAMADORES (2? EdifSo) 

M. Bohl, 244 pp.. CrS 3.650,00 

• JCL SISTEMA/370 (3? Edi9ao) 

G.D. Brown. 260 pp., Cr$ 6.140.00 

• LCP - LOGICA de CONSTRUgAO DE PROGRAMAS 

J.D.Warnier, 188 pp., CrS 3.630,00 

• COBOL PARA ESTUDANTES (2? Edi9ao) 

A. Parkin, 240 pp., Cr$ 4.520.00 

• MICROINFORMATICA INTERNACIONAL (VOL. 1 - 
1983. 6 N?s.) 

Uma publica(;3o bimestral especializada, sobre Micro- 
eletronica.Microprocessadores. Mem6rias.Perifericos. 
Software, Aplica^Oes e Seguran^a Fi'sica, Operacional 
e de Sistemas de Computadores. 

(Para Assinaturas. contatara Editora.) 

ADQUIRA SEUS LIVROS AQUII 

Recorte ou xeroque esie anuncio e o envie, ainds hoje, junta- 
menle com cheque nominal no valor dos livros desejados. para: 
EDITDRA CAMPUS LTDA.- Rua Japeri, 35 - Rio Comprido - 
CEP. 20261 - RIO DE JANEIRO - RJ. Tel.: (021) 284-8443 
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FOR A = 10 


.000 


TO 


01 


LBL"^ T 




STEP - 1 






02 


10.000 


30 


NEXT A 






03 


LBL 00 


40 


BEEP 






04 


DSE X 


50 


END 






05 
06 
07 


GTO 00 

BEEP 

END 



Figura 1 — Programa de contagem regressiva, de 10 mil a zero, 
no HP-85 enaHP~41C. 

contagem regressiva de 10 mil ate zero, de unidadeem 
unidade, sem indIca(pao dos numeros no visor :o que o 
HP-85 realiza em 16 segundos, a HP-41C leva 16 mi- 
nutos para concluir (60 vezes mais lenta), conforme- 
OS programas contidos na figura 1 podem demonstrar. 

Um benchmark semeihante 6 citado no livro de 
Robert Swirsky (3), embora nsfo fornega os progra- 
mas. Cita, apenas, que um algoritmo expresso em 
PL/1 sera processado bem mais rapido do que o mes- 
mo algoritmo codiftcado em BASIC nao compilado e, 
como exempio, afirma que "um programa para contar 
de 1 a 10 mil, de unidade em unidade, levaria cerca de 
1 2 segundos em BASIC, mas menos de 1 segundo em 
PL/1!" 

Algumas operapoes de muita utilidade com matri- 
zes sao facllmente feitas num micro, como e o caso 
do VisiCalc, cuja simulagao nao ^ tao eficaz numa 
calculadora programavei como a HP-41C, por causa 
da limitapao de memoria e da menor visao de conjun- 
to antes da impressao (dimensoes do vfdeo versus di- 
mensao do mostrador da calculadora). 

Mesmo assim, jd existem no mercado nacionai ver- 
soes do VisiCalc para a HP-41C. E quem conhece o 
VisiCalc aplicado no micro, note a semelhanga do 
mesmo na HP-41C e, ao mesmo tempo, a limitafpao 
de tempo inerente ao equipamento, embora seja uma 
calculadora programavei das mais avangadas. 

REFERENCIAS 
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Aprenda como desenhar figuras geometricas, jogos e ate objetos 
em movimento nos micros TK82-C, TK85, NE-Z8000e CP-200. 



Desenhe e brinque 
com micro 



Andrew Fa'irbairn 







desenvolvimento da tecnica de desenhar no vf- EIXO Y 
deo, que alem de recreativo, suscita situagoes 
educativas, envolve processes que requerem, 
inicialmente, um mergulho no reino da teoria para po- 
dermos, depois, aplicar nossos proprios programas, 
desenhando ci'rculos, quadrados, objetos animados e 
jogos. 

Esta tecnica pode ser dividida em duas partes, sen- 
do que, na primeira, denominada GRAFICOS, a tela 
no vi'deo e dividida em quadrinhosde igual tamanho, 
numa matriz medindo 64 por 44 quadrinhos (cada 
um deles possui um enderego particular que e diferen- 
te detodososoutros). A segunda, TEMPO REAL, e o '^'ff"''^ ' 
metodo de chamar atenpao imediata do computador. 
ao nosso comando, mesmo que ele esteja fazendo ou- 
tro trabaiho naquele instante. 

Para utilizar asduas tecnicasacima, usaremosas pa- 
lavras; PLOT, UNPLOT, PRINT AT, !NKEY$, POKE 
e PAUSE. 

EIXOS E COORDENADAS 

Conslderando a tela do video como sendo uma fo- 
Iha de papel quadriculado, podemos imaginar dois ei- 
xos, conforme mostra a f igura 1 . computador reco- 
nhece o ponto em que os dois eixos se cruzam como 
sendo no eixo Y vertical e no eixo X horizontal. 
Portanto, este ponto possui as coordenadas 00. Para 
produzir a matriz (64 por 44 quadrinhos), basta es- 
crever no eixo Y, os numeros entre e 43, e no eixo 
X, de Oate 63, como ilustra a figura 2. Figura2 
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Para identificar, no computador, qual quadrinho 
desejamos preencher e necessario especificar, no pro- 
grama, numero correspondente no eixo X e o nume- 
ro correspondente no eixo Y, na ordem escrita. Consi- 
derando que, em nosso programa, os quadrinhos pre- 
enchidos tenham as coordenadas 60,40, 61,41 e 
62,40, note que um quadrinho preenchido e conheci- 
do como pixel (abreviatura de picture element em 
ingles). Podemos experimentar o que aprendemosate 
agora usando a palavra PLOT: 



Prograna 1 


10 


PLOT 


0,0 


20 


PLOT 


63, *3 


30 


PLOT 


63,0 


40 


PLOT 


0,43 


50 


STOP 
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Considere agora o eixo X. Para desenhar uma linha 
reta, ao longo do eixo, as coordenadas seriam: 0,0, 
1,0, 3,0, 4,0 ... 63,0. Repare que todas as coordena- 
das no eixo Y sao iguais a 0. Neste caso dizemos que 
o eixo X tem como equagao Y=0. Da mesma forma, o 
eixo Y tem como equacpao X=0. Portanto, para dese- 
nhar eixo Y na tela, basta apenas plotar todos os 
quadrinhos onde X=0. 

Programa 2 

10 FOR Y = TO 43 
20 PLOT 0,Y 
30 NEXT Y 

Observe como na linha 10 dissemosao computador 
para contar de ate 43; na linha 20 para preencher o 
quadrinho nas coordenadas 0,0; na linha 30 para vol- 
tar a linha 1 e buscar novo numero (desta vez Y=1 ) e 
assim por diante ate Y=43. Juntamos, agora, ao pro- 
grama 2 programa 3, para produzir os eixos X e Y 

Programa 3 

40 FOR X=0 TO 63 

50 PLOT X,0 

60 NEXT X 

70 STOP 

Apos experimentar algumas vezes o trabaiho feito 
ate agora, sempre lembrando que qualquer linha verti- 
cal tem equacaoX={um numero) e da mesma forma a 
horizontal tem equaipao Y = (um numero), passe aos 
exerci'cios. 

No primeiro deles, desenhe um retangulo utilizan- 
do as coordenadas 0,0, 0,43, 63,0 e 63,43 como li- 
mites e temos entao a solupao dos programas 2 e 3. 

Programa 4 

10 FOR X-0 TO 63 

ZO PLOT X,0 

30 PLOT X,43 

40 NEXT X 

50 FOR Y=0 TO 43 

60 PLOT 0,Y 

70 PLOT 63, Y 

80 NEXT Y 

MICRO SISTEMAS, iunho/83 



Voce vera dois pares de linhas paralelas desenhadas 
na tela, comecando com o par de linhas horizontals, 
depois as verticals. Experimente agora o programa 
abaixo: 

Programa 5 

10 FOR X=0 TO 32 

20 FOR Y^O TO 22 

30 PLOT X,Y 

40 NEXT V 

50 NEXT X 

Mude OS valores de X e Y nas linhas 10 e 20 e note 
que as linhas sao desenhadas em sentido vertical, de 
baixo para cima da tela. Veja se consegueadivinhar a 
diregao em que serao desenhadas as linhas, antes de 
executar este programa : 

Programa 6 

10 FOR Y=0 TO 40 

20 FOR X^O TO 60 

30 PLOT X,V 

40 NEXT X 

50 NEXT Y 

Em outro exerci'cio desenhe um quadro preto me- 
dindo 15 por ^b pixels, cujo canto inferior esquerdo 
se situe nas coordenadas 15,10. Para soluciona-lo, de- 
vemos, primeiro, dizer ao computador exatamente 
aonde desejamos desenhar nosso quadro. Entao, as >» 
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coordenadas serao: X=15 + 15 = 30, e Y=15 + 10=25. 

Portanto, nosso programa devera ser assim; 

Prograaa 7 

10 FOR X^15 TO 30 
20 FOR Y=10 TO 25 
30 PLOT X,Y 
40 NEXT Y 
30 NEXT X 
£0 STOP 

£ necess^rio experimentar varias coordenadas e di- 
mensoes antes de prosseguir. At^ este ponto, dese- 
nhamos linhas verticals e horizontals. No entanto, ge- 
ralmente, a maioria das linhas que desejamos dese- 
nhar terao outros rumos. 

LINHAS DIAGONAIS 

Iniciando uma linha em diagonal nas coordenadas 
0,6; e terminando-a nas coordenadas 18,42, conforme 
mostra a figura 3, verificamosque a linha atravessa os 
quadros 0,6, 1,8, 2,10, 3,12, 4,14, 5,16 ... 18,42. Es- 
tudando meticulosamente as coordenadas vemos que 
todas tern algo enn comum. Em cada caso, se multipli- 
camos valor X por 2, e depols somamos 6 ao pro- 
duto, temos o valor Y. A partir desta coincidencia 
produzimos uma equa^ao: 
Equapao 1 : Y = 2x + 6 

Nao devemos simplesmente acredltar na eficacia 
das equagoes propostas, mas sIm testa-las a qualquer 
prova. programa a seguir faz isto: 

Prograaa 8 

10 FOR X ^ TO 18 
20 PLOT X,2*X + 6 
30 NEXT X 
40 STOP 

A equa(pao em si nao resolve o problema, pois pode 
desenhar apenas uma linha de inclinapao fixa. Para 
produzir um programa capaz de desenhar uma serie 
de linhas, cada uma corretamente inclinada no angu- 
lo desejado, temos de modificar a equapao. 

Estude novamente a figura 3 e veja que o angulo 
de inclina(?ao da linha se calcula ao dividir o compri- 
mento (ao longo do eixo X) pela altura (ao longo do 
eixo Y). No caso, a altura A da linha tracpada pelo pro- 
grama 8, equivale a 42 - 6 = 36, enquanto que o 
comprimento C e de 18 quadros. Portanto, A (altura) 
dividldo por C (comprimento) =A/C = 36/18 = 2. 

Para qualquer linha reta, o angulo de inclinapao I 
pode ser calculado da forma I = A/C. Considerando o 
ponto de onde iniciamos a- linha do eixo Y como sen- 
do igual a H, a equapao 1 ser^ modificada para: 
Equapao 2: Y = 1 x X + H (equapao geral para linha 
reta). 

£ necess^rio lembrar que qualquer linha que inter- 
ceptar o eixo Y tera como equagao X = 0. Neste pon- 
to, teremos Y =0. Da mesma forma, ao interceptar o 



m 




18,42 



63 



eixo X, uma linha reta terd como equapao: Y =0. Por- 
tanto, temos como equa<pao: 0= lxX-t-H=X = 
-H/l. 

Incorporando a equapao 2 no proximo programa, 
podemos fornecer vdrios valores para I e H, e ver o 
efeito de cada par. Experimente tanto com valores ne- 
gatives para I, quanto positivos. Utilizando um papal 
quadriculado e lapis, desenhe os dois eixos, adequada- 
mente enumerados, e tente traipar cada linha, de acor- 
do com OS valores escolhidos para I e H. Neste ponto 
temos algumas surpresas. 



Prograaa 


9 




10 


CLS 






20 


PRINT 


"VALOR 


I?"; 


30 


INPUT 


I 




40 


PRINT 


I 





50 PRINT "VALOR H?"; 

60 INPUT H 

70 PRINT H 

80 PAUSE 200 

90 CLS 

100 PRINT AT 0,6; "Y= ";I;"*X + '';H 

110 FOR X = TO 63 

120 PLOT X,0 

130 NEXT X 

140 FOR Y = TO 43 

150 PLOT 0,Y 

160 NEXT Y 

170 FOR X = TO 63 

180 IF I* X + H < OR I • ) 

GOTO 210 

190 PLOT X,I»X + H 

200 NEXT X 

210 PRINT AT 2,10;"0UTRA LINHA? (S/N)" 

220 INPUT AS 

230 IF AS = "S" THEN GOTO 10 

240 IF AS = "N" THEN STOP 

Ao executar o programa, as linhas 110 a 160 dese- 
nham os eixos X,Y. As linhas 170 a 200 calculam o 
angulo de inclinaqao e altura no eixo Y, donde ini- 
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H >43 THEN 



ciar cada linha. A linha 180 foi inclui'da para evitar 
que o computador tente desenhar uma linha alem 
dos limites onde Y=0, ou Y maior que 43. Use valo- 
res de I entre -5 e 5, lembrandodeempregar valores 
razo^veis para H. 

MOVIMENTO DOS OBJETOS 

£ bom divergir, de vez em quando, de um assunto 
muito tedrico e partir para outro mais pratico. Vol- 
taremos ao assunto em questao depois de aprender 
como fazer objetos se movimentarem. 

Para podermos desenhar objetos animados na tela, 
usaremos o mesmo metodo adotado em desenhos ani- 
mados. artista primeiramente desenha e fotografa 
objeto, depois desenha este mesmo objeto em posi- 
gao um pouco diferente da anterior e assim por dian- 
te, talvez centenas de vezes, para produzir um filme. 
Para mover um pf'xe/, ou um grupo de pixels entre 
dois pontos na tela, precisamos preencher um deter- 
minado quadro, apaga-lo, e depois preencher outro 
quadro ao lado do anterior. Para efeito de demonstra- 
pao, podemos modificar o simples programa 3 da se- 
guinte maneira: 



Prograwa 10 

10 FOR X = TO 63 
20 PLOT X,0 
30 UNPLOT X,0 
40 NEXT X 
50 STOP 

Ao executarmos o programa 10 vemos um quadri- 
nho (aparentemente) se mexendo rapidamente por 
toda extensao do eixo X. Neste ponto, e vantajoso 
controlar a velocidade do pontinho, e neste caso, te- 
mos duas maneiras de fazer isto: 



Prograia 11 

10 FOR X = TO 63 

20 PLOT X,0 

30 PAUSE 10 

40 POKE 16437,255 

50 UNPLOT X,0 

60 NEXT X 



Vejamos as linhas 30 e 40 (este 6 o metodo mais 
usado). Executamos o programa usando valores maio- 
res e menores de PAUSE (PAUSE 50 equivale a uma 
pausa, de mais ou menos um segundo; PAUSE 100 a 
dois segundos, e assim por diante). Para desenhos ani- 
mados, sempre devemos incluir a palavra POKE, se- 
guida normalmente pelo enderepo 16437, e aquanti- 
dade de memoria, neste caso 255, a qual desejamos 
preservar intacta. 

Experimente agora o programa, utilizando FOR 
TO - NEXT, ao inv6s de PAUSE e POKE. 
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Prograia 12 

10 FOR X = TO 63 

20 PLOT X,0 

30 FOR A = 1 TO 10 

40 NEXT A 

50 UNPLOT X,0 

60 NEXT X 

70 STOP 

Experimente valores maiores para A, tal como de- 
monstra o programa a seguir. Nas linhas 20, 30, 40 e 
50 programa desenha um objeto, mas nas linhas 80 
e 90, o programa apaga apenas os quadrinhos: X,0 e 
X-M,1. 

Mas antes, fapa o desenho numa foiha de papel 
quadriculado de acordo com as coordenadas do pro- 
grama. Apague os quadrinhos X,0 e X + 1,1. Lem- 
breque a linha 10 do programa avanpa o valor de 
X para 1 , 2, 3, 4, 5 ate 63, e o computador repete o 
programa 64 vezes. Fapa o desenho do objeto para 
cada valor de X, nao esquecendo de apagar os quadri- 
nhos de acordo com as novas coordenadas das linhas 
80e90. 

Depois de ter elaborado o segundo desenho do ob- 
jeto tera ocorrido a voce que precisamos apagar os 
quadrinhos que nao serao ocupados por novas coor- » 
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denadas. Asstm, o programs 13 serd executado com 
rapidez e eficiencia. Vejamos: 



ProqraHa 


13 


) 


ro 




10 


FOR X 


= { 


63 


20 


PLOT X 


,0 








30 


PLOT X 


+ 


1 


.0 




itO 


PLOT X 


+ 


2 


,0 




50 


PLOT X 


+ 


1 


,1 




60 


PAUSE 


10 








70 


POKE 16437 


,255 


60 


UNPLOT 


X, 









90 


UNPLOT 


X 


+ 


1, 


1 


100 NEXT 


K 






- 


120 STOP 











REVENDOGEOMETRIA 

At^ momento, os nossos programas desenharam 
linhas compridas, curtas, objetos se movimentando e 
linhas diagonals. Mas como podemos saber se uma li- 
nha pode estourar o nosso programa provocando 
mensagem de erro? Para evitar este acontecimento 
temos que recorrer a Trigonometria, no que diz res- 
peito a tangentes. 

Sabe-se que as tangentes se determinam pela ra- 
zao proporcionai de dois lados do triangulo retangu- 
lo (veja a figura 4), portanto, a tangente do angulo em 
A ser^; 

LADO OPOSTO 



LADO ADOACENTE 
Ou A = a/b 



Utilizando a equapao de tangentes podemos defi- 
nir a inclina(?ao ou o angulo de qualquer linha reta 
que desejamos desenhar. nosso programa podera 
desenhar linhas possuindo angulos entre e 90 graus. 
Entretanto, seria facil se puddssemos dizer ao compu- 
tador para desenhar uma linha cujo angulo fosse igual 
a tangente do angulo A. Infelizmente nao podemos, 
porque os matematicos que projetaram o sistema 
complicaram nossos calculos, ao determinar que o sis- 




Figura 4 
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tema reconhega apenas as tangentes de angulos em 
Radianos, que sao unidades de medidas circular. Mas, 
este fato nao d grande obstaculo, pois sabe-se que um 
equivale a 2PI/360 Radianos. Sendo assim, podemos 
desenvolver o proximo programa: 

Prograwa 14 

10 PRINT AT 0,0;"ANGULO?"; 

20 INPUT A 

30 PRINT A 

40 IF A<0 OR A > 90 THEN GOTO 20 

50 LET I = TAN (A*2»PI/360) 

60 FOR X = TO 63 

70 IF I*X>43 THEN GOTO 100 

80 PLOT X,INT (I»X) 

90 NEXT X 

100 PAUSE 100 

110 POKE 16437,255 

120 PRINT AT 0,8;''eeee'' 

130 GOTO 10 

Repare como podemos implantar sistemas de se- 
guranpa em nossos programas: a tangente de um an- 
gulo menor que 0, ou maior que 90 graus, por exem- 
plo. So para comprovar, calculamos a tangente de 90 
graus. £ infinitamente larga! Por essa razao, a linha 40 
evita que o computador tente fazer tal calculo. A 
linha 50 calcula o angulo da tangente. A linha 70 
evita que uma linha se estenda al^m do limite do eixo 
Y (43), que provocaria estouro e mensagem de erro. 
As linhas 100-130 permitem que cada linha desenha- 
da permanega na tela. 

Agora que nosso programa desenhou varias linhas, 
alteramos o programa 14 para quesejam inscritasto- 
das as tangentes dos angulos entre e 85° com 5° 
entre cada linha: 

10 FOR A = TO 65 STEP 5 

20 LET I = TAN (A»2*PI/360) 

ETC 

80 POKE 16437,255 

90 NEXT X 



mesmo 

ma 15: 



trabalho pode ser feito atrav^s do progra- 



Prograwa 15 

10 FOR A = TO 85 STEP 5 

20 LET I = TAN (A»2»PI/360) 

30 FOR X = TO 63 

40 LET Y = INT (I»X) 

50 IF Y > 43 THEN GOTO 80 

60 PLOT X,Y 

70 NEXT X 

80 NEXT A 

Para saber, com antecipatpao, o comprimento de 
uma linha ou o trajeto de um objeto animado usa- 
mos o Teorema de Pitdgoras. Sendo A a hipotenusa 
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de um triangulo, e B e C os catetos, temos que A^ 
= B^ + C^ Para testarmos esta teoria basta alterar 

uma linha do programa 15, substituindo a linha 50 
pela seguinte (note que 43x43=1 849) : 

50 IF (X=X) + (Y=Y) > 1849 THEN GOTO 80 

As linhas terao o mesmo comprimento. Sendo as- 
sim, acabamos de desenhar a metade de uma tela de 
aranha. Se quisermos desenhar a teia completa te- 
mos que estudar um pouco sobre Linhas que cruzam 
um ponto. 

TEIA DE ARANHA 

Suponhamos que o nosso desejo seja o de desenhar 
uma linha, cuja trajetoria se inicia e termina nas co- 
ordenadas 2,3 e 15,20, respectivamente. Estes dois 
pontes satisfazem a equa(?ao Y = IX + H. Portanto, 
para o ponto 2,3 teremos 3 = 21 -HH e o outro ponto 
20 = 151 + H, que nosdeixa em frentea um par de 
equagoes simultaneas. Isto nao e problema, pois sa- 
bemos que, geralmente, a equa<?ao da linha 2,3 a 
15,20 pode ser obtida pela equa(pao: 



Y-a 



o-« 



X-b 



d-b 



Nosso desejo e desenhar uma teia completa, cen- 
tralizada no meio da tela, n3o e mesmo? ponto 
mais proximo do centro tem as coordenadas X.Y= 
32,22; logo, para as linhas originarias do eixo Y cru- 
zarem o centro temos como base b,a = 32,22 e d c 
= 0,YDai: 



Y-22 



c-22 



X-3Z 



0-32 



Y = 22 - (X-32) X (c-22) / 32) 

Passamos, entao, para outro programa : 

Prograwa 16 

10 FOR C = TO 40 STEP 5 

20 FOR X = TO 63 

30 LET Y = INT (22-(X-32) x (C-22)/32) 

40 IF Y > 43 OR Y < THEN GOTO 70 

50 PLOT X,Y 

60 NEXT X 

70 NEXT C 

Apos executar este programa, voce pode perguntar 
por que o computador nao desenhou uma teia com- 
pleta. Bem, nosso programa ordenou que o computa- 
dor, apenas, desenhasse as linhas ao longo do eixo 
Y. Para desenharmos uma teia completa, temos que 
considerar, novamente, a equacpao Y = IX + H. Uma 
linha de inclinapao ou angulo I pode ser calculada, ja 
que sabemos o ponto por onde a linha passar^, no 
meio da tela. Podemos dizer que; 
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I = 



Y-22 



X-32 



Vemos que a linha ter^ como coordenada Y = 
I (X — 32) + 22, que e a progressao matematica da 
equapao acima. A inclinapao de metade das linhas tera 
que ser negativa. Vejamos entao o programa 17. (Caso 
nao tenha entendido exatamente o porque de usar- 
mos valores negatives de I, entao volte ao programa 9 
e experimente). 

Progra»a 17 

10 FOR I = -5 TO 5 STEP 0.5 

20 FOR X = TO 63 

30 LET Y = INT (I»(X-32) + 22) 

40 IF Y > 43 OR Y < THEN GOTO 60 

50 PLOT X,Y 

60 NEXT X _ 

70 NEXT I fi 
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• SUPRIMENTOS (Diskettes, Fitasetc} 




Rua AyliondaCusia, IlSSaraslOl /202e2H5,'2«6. 

Bairro 25 de Agosio - Duque de Caxias - RJ - TeL: 771.0312 
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• A MICRO-KIT promove cursos para ju- 
Iho de 83: BASIC para adultos e crian^as e 
cursos aplicativos para microcomputadores 
como VisiCalc, VisiTrend, VisiPlot, entre ou- 
tros. A loja estd langando, lamWm, um sis- 
tema de aulas particu lares solicitadas por 
clientes que dessjem receber informacSes di- 
retas e pormenorizadas sobre micro-computa- 
dores. Estas aulas sercTo dadas na loja com ho- 
r^no prevjamente marcado pelo telef one : 
(021) 267-8291. O enderego da MICRO-KIT 
6 R. Visconde de Pirajd, 303/210 - Ipanema 
— Rio de Janeiro. 

• Curso de BASIC: turmas Ijmrtadas (no md- 
xjmo dez alunos); aulas didrias das 19:00 as 
21:00h; duraglo de duas semanas. Inscri?5es 
e maiores informatSes na NASAJON SISTE- 
MAS, que fica na Av. Rio Branca, 45/1311. 
O telefone 6 (021) 263-1241 - Rio de Ja- 
neiro. 

• A Loja Ipanema Micro conttnua com sua 
programaglo mensal de cursos de introdupao 
ao BASIC, agora com novas instala^Ses. Os 
cursos sSo realizados pela manhS, tarde ou 
noite com aulas tebricas e pr^ticas em micro- 
computadores ds segundas. quartas e sextas- 
feiras. As turmas sao Ijmitadas, no mSximo, 
em dez alunos, adultos e crianpas, Informa- 
^Ses sobre datas e taxa de inscrlgSo pelos te- 
lefones (021) 259-1516 e 274-5574: en- 
derei;o da Ipanema Micro 6 Rua Vise, de Pi- 
rajd, 540 - Ij. 106 - Ipanema, Rio de Ja- 
neiro/RJ. 



• A COMPUCENTER estar^ realizando de 
27 8 29 de julho os cursos; "Redes de Compu- 
tadores" e "Como Melhorar o Rendimento 
do Computador" no hordrio das 09:00 as 
17:00 h. O prtmeiro ser^ realizado no Riode 
Janeiro no Hotel Meridien, Av. Atlantica, 
1020, Copacabana. O segundo serd em Sao 
Paulo no Hotel Cadoro, Rua Augusta, 129, 
Centro. InsCTicoes e informapSes pelos te- 
lefones (Oil) 255-5076 e 255-9662. 

• A CompuShop estd com jnscri?6es abertas 
para uma s^rie de cursos. De 26 a 30 de junho 
vai ser realizado o "VisiCalc", com durapSo de 
16 horas e preipo de Cr$ 60 mil. De 4 a 7 de 
julho serd mmistrado o curso "Desmistifican- 
do o microcomputador", com 12horasde au- 
la e pre<;o de Cr$ 30 mil. De 4 a 15de julho 
serS a vez do curso "Descobrindo o micro- 
computador", para jovens de 10 a 15 anos, 
com nopSes de BASIC e LOGO, num total de 
20 horas de aula. O prepo para inscri^o 6 de 
Cr$ 35 mil. O enderepo da CompuShop 6 R. 
Dr. Mdrio Ferraz. 37, Sac Paulo. Tels.: (Oil) 
210-0187 6 212-9004. 

• A MINAS DIGITAL contmua mintstran- 
do cursos de Digitapao e Programaglo BASIC 
com aulas praticas. Estes cursos podem ser 
miciados a qualquerdia, no hordrio das 08:00 
as 21 :00 h. O curso de Digitacao tem um alu- 
no por m^quina e custa, a prazo, 3 parcelas de 
CrS 6 mil e 200, ou a vista com 107c de des- 
conto. de BASIC tem, no mdximo, tres alu- 
nos por cada computador e sai por tr^s parce- 
las de CrS 11 mil ou Cr$ 30 mil & vista. A 
MINAS DIGITAL oferece, ainda, curso de 
BASIC para turmas fechadas 124 alunos). O 
endereco 6 Rua Tupinambds, 1045 — cjs. 601 
e 602 - Belo Horizonte-MG. Telefone (031) 
201 -7555. 



Computador 
sem""" 



• • 



Ainda bem que existe a 
Microshop. 

Ela 6 a unica loja de 
computadores onde voc6 6 atendido 

gor gente formada em Computer 
cience na Universidade de Nova 
York. E a unica tamb6m que de- 
senvolve software especialmente 
para vocfe. 

E tem o Microcomputador 
Ap II Unitron, versfio nacionali- .„,- , 
zada do famoso Apple, com 48 k bytes, 
em conditOes muito especiais. 
Venha nos visitar. 






fCfO 

Shop 

AL Lorena. 652 I 

Sio Paulo SP. ■ 

TeL: lOUl 282-210S e S52-5603. 



• Cursos de microcomputadores sao minis- 
trados pela FUNOATEC-UFRGS em Porto 
Alegre. A programagao inclui: Linguagem BA- 
SIC para Apple 11, Mtcroengenho, Unitron e 
outros, com aulas te6rico-prdticas em micros, 
sobre Arquivos, VisiCalc, Banco de Dados e 
Processadores de Texto. Cada curso tem a du- 
ra<;:ao de 30 horas-aulas. InformacCes pelo Te- 
lefone (0512) 25-3240 - Porto Alegre. 

• O CEAPRO - Cursos de Especializagao e 
Aperfeiijoamento Profisstonal — estd com ins- 
cri^Ses abertas para os cursos: "Micropro- 
cessadores Aplicados a Controle" de 18/07 
a 22/08, is segundas, quartas e sextas-feiras 
das 19:00 hs 21:30 h; e "Microprocessador 
8086" de 12/07 a 18/08, ^s terras e quintas- 
feiras, no hor^no das 19:00 hs 21:30 h. 
enderego do CEAPRO 6 Av. Presidente Var- 
gas, 590/217, telefone (021) 233-5239, Rio 
de Janeiro. 

• A MICROID^IA SISTEMAS, EDUCA- 
QAO E INFORMATICA LTDA. promove cur- 
sos regu lares de BASIC nos hor^riosde 17:00 
is 19:00 e 20:00 ks 22:00 h. Os cursos tSm 
dura?3o de 20 horas e o treinamento, para 
turmas de 1 2 alunos 4 feito em dois micros. 
prepo 6 de CrS 20 mil e o endere<;o para ins- 
cri?6es 6 Av. Mai. Camara, 160/1426 - Ed. 
Orly-Castelo, Rio de Janeiro. Qualquer in- 
formapfo pelos telefones (021) 265-2252 a 
288-0333. 

• Nucleo de Onentagao de Estudos estd 
oferecendo os cursos de BASIC ni'veis 1 , 2 e 3 
com duracao de 20 horas ao prepo de CrS 45 
mil; Linguagem de Mdquina para o TK82-C 
com durapcio de 40 horas ao prefo de CrS 66 
mil; Cursos de Jogos com duragSo de 20 ho- 
ras ao prepo de CrS 42 mil. Nucleo fica na 
Av. Brig. Faria Lima, 1451 , conj. 31 — Itaim- 
Bibi, SP. Tel.: (Oil) 813-4555. Vagas limi- 
tadas. 

• O CEDM — Cursos de Aperfeipoamento 
T6cnico — esti oferecendo o "Curso de Ele- 
trdnica Digital e Microprocessadores" por cor- 
respondfincia. Dividido em 36grupos, o curso 
oferece material de prdtica (kits) e, no final, 
um kit surpresa como "premio de formatura". 
O aluno receberS um certificadode conclusSo 
do curso. enderego para o pedido 6 Caixa 
Postal 1642 - CEP 86100 - Londrina-PR. 
endereco do CEDM 6 Rua Piauf, 191, sis. 
31 e 34, tel.: (0432) 23-9674. 

• Estao abertas as inscri?oes, no Centro Edu- 
cacional Carvalho de Mendonga, para os se- 
guintes cursos: Programagao BASIC I; L6gica 
Digital I e II; Microprocessador ZBO e 8080/ 
85; Circuitos L6gicos CMOS; Amplificadores 
Operacionais e Teleprocessamento. Todos eles 
tfem 40 horas de duracao, com turmas pela 
manhS, tarde, noite e aos s^bados. Apostilas 
gratuitas e aulas praticas em laborstdrio pr6- 
prio. Rua Evaristo da Veiga, 20 - Centro - 
Rio de Janeiro - Telefones (021 ) 220-8820 e 
220-7009. 

• A Teplan Informdtica realize cursos se- 
manais intensJvos, com 10 horas de aula, de 
segunda is sextas-feiras, ^s ig:30h, sobre 
"ProgramapSo BASIC aplicada aos difarentes 
micros", com a finalidade de populanzar esta 
linguagem junto aos futuros usuinos. Infor- 
ma(?5es pelo telefone: (Oil) 881-0022 - Sao 
Paulo. 



Para informar ao leitor sobre os cursos que 
estao sendo oferecidos, a revista recoihe in- 
formates em diversas instftuipdes ou as rece- 
be pelo correio. Portanto, nao nos responsabi- 
lizamos por quaisquer alteragoes posterior- 
mente efetuadas por estas instituipoes nos 
programas ou prepos. 
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Maxxi^o micro pessoal muito 

prof issional da PoLymax 
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O MaxKi ^ um microcomputador pessoal — profissional de grande versatilidade 

e assegurada po^ibilidade de expans^o, Compative) com APPLE II 

PLUS*, aceita mais de 5 mil programas aplicativos disponfveis no mercada 

Sua caracterlstica padr5o inclui um monitor e linguagem Polysoft Basic, ambas 
gravadas em ROM, com 2 kbytes e 10 kbytes, respectivamente, 48 kbytes de 
mem6ria RAM disponiveis para o usuirio; interface para gravador cassete, 
vfdeo e tv colorida (sistema PAL-M); teclado padrlo ASC II e fonle de 
alimentai;5o, dispostos em um gabinete pr6prio. 

Vefa aqui sua ess^ncia tunica: 

Microprocessador 

6502 operando com freqiifincia de 1 MHZ. 

Vfdeo 

O Maxxi possui um v(deo profissional de 12" com fosfatiza^So verde e pode 
conectar-se tamb^m com uma televisSo comum (colorida ou preto & branco), 
operando no modo lexto ou gfjfico (baixa ou alta resolu<;ao), sendo 
completamente transparente ao usuArio o acesso k memdria. No modo grdfico, 
as ultimas 4 linhas do vfdeo operam no modo texta Todos os modos de 
operagSo com o video s3o sefecioniveis por Software. 
Modo Texto 

• 40caracteres/linha, 24 linhas. 

• Caracteres 5x7. 

• Vfdeo nomial, reverso e piscante. 

• Controle pleno do cursa 
Modo Gi^fico 

(baixa resolu<;3o) 

•40h x48vou40h x40v com 4 linhas de texto. 

• 16 cores selecion^veis por Software. 

• Comando especfficos do Ralysoft Basic para uso 

do Modo Crlfico:COLOR. PICT, HLIN, VLIN. SCRN. 
(alta resoiu(So) 

• 260 h X 192 V ou 280 h X 160 v com 4 linhas de texto. 

• 6 cores selecion^veis por Software. 

• Comandos especificos do Ralysoft Basic para uso no modo 
gr^fico: HCOLOR, HPLCfT. 

• Imagem do video residente em 8 kbytes. 



Agoravamos 
processar os dados 

tecnicosdele. 

Men>6ria 

A membria dinSmica RAM ^ organizada em 3 incrementos de 16 kbytes cada 
um, num total de 4J9 kbytes totalmente disponfveis para o usuario. Esta 
memdria pode ser aumentada conforme a necessioade do usuSrio adicionando 
placas de expansSo. PDssui lamb^m 10 kbytes de ROM para armazenamento 
do Polysoft Basic e 2 kbytes de ROM para o sistema monitor. Sistema de 
"Refresh" automitico. completamente transparente. Mem6ria r^pida — tempo 
de acesso de 350 ns, 

Entrada e Safda 

O Maxxi inclui um teclado com padrSo ASC II; interface para gravador cassete, 
vfdeo e tv colorida sistema PAL-M; um conjunto de 8 conectores para a liga<;ao 
de cart6es controladores de perif^ricos e expansdes; 3 entradas de 1 bit, 4 
entradas anal6gicas para conexSo de "joystick" e 4 safdas digitals de 1 bit. 

PoJysoft Basic 

Possui caracteristicas b^sicas do padrSo Basic com tunicas de forma a propiciar 

m^ximo rendimento dos recursos de Software do produto. 

Monitor 

Cravado em ROM com 2 kbytes. 

Perif^ricos e acess6rios disponiveis 

O Maxxi de concep^ao modular, cresce de acordo com os perrftricos a ele 
incorporados. dentre os quais destacamos: TV comum. a cores ou preto & 
branco — Monitor profissional Poiymax de 12" com fosfatiza^ao verde — 
Unidade de drives de disquetes de 5Vi". organizado com 25 trilhas, 16 setores 
de capacidade de 256 bytes cada um — (Jnidade de gravador cassete — 
Interface serial para impressora — Impressora Polyprint 90 CPS de 80/132 
colunas — Controladores de jogos — Interface serial para comunicac5o de 
dados — Modem — Placa de expansSo de memdria RAM para 64 kb — Placa 
de CPU Z-80 (sistema operaciona! CP/M) — Placa Videx expansora de vfdeo de 
40 para 30 colunas — modulador de R.F. 



• Oulros prodtilos da fttlyiiuu: 

• POLY 301 WP (PolvtCTibi) 

• POLY 201 DP • POLY lOS DP 

• POLY 201 D£ • POLYNET 
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Viajando ao fundo do DGT-100 voce nao encontrar^ o tesouro perdido de urn navio 
naufragado, mas poderi descobrir co/'sas muito interessantes. 



Viagem ao fundo 
do DGT-100 



Newton Duarte Braga Junior 



uitos j^ devem conhecer o fundo do mar atra- 

v^s do famoso seriado da televisao norte-ame- 

, Iricana Viagem ao fundo do mar, mas agora 

n6s vamos viajar pela mem6ria do micro DGT-100, 
explorando espagos e desvendando mist^rios. 

Para empreender esta viagem usaremos as fungSes 
PEEK(x) e CHR$(y). A primeira fornecer^, em deci- 
mal, o c6digo docar^terarmazenadonaposipaodeme- 
m6ria (x); e a segunda fornecer^ o car^ter cujo c6di- 
go6 (y). 

Tudo pronto? Entao, vamos iniciar nossa viagem 
atrav^s do programa da f igura 1 . 



6<tOO0 CLS;PRIHT«,"(IUAL ENOEBE5O IHICIAL ■'; M : I 2-1 1 + 1 : 
CLS 

61)001 PRINT*), "PCS. KEM". "COD. CONT","CAftACTE ft": :Pfi1HT:X-6l«: 

FORI -I lTOI2:X-X-»6'i:PRiNTX.I ,PEEK{I),CHRS(PEEK(0): 

NEXT I 
61(00! HS-INKEYS: I FRS-""THEH6'(Q0!ELSE I FASC (fiS) -91THEn61i00 3 

ELSEIFASC(BS)-10THEN61|006ELSEIFRS-"F"THEHCLS:EHDELSE 

IFR$-"R"THENGit00OELSE6<i00 2 
6I|003 I 1-1 1«t : 12-IZ+l 
6I|00't IFI l<DTHENn-0: 12-IUlO 
filiQOS GOTOfi'tDOl 
6I1OO6 ll-l 1-I : I2-I2~1 

6500 7 IFI2>3 2 767THENI2-3Z76 7:11-I2-10 
61(008 GOTO6I1OOI 



Figuta 1 



Este programa solicita um enderepo inicial. Feito 
isto, a mem6ria ^ listada da poslgao I at^ 1+10. Nes- 
te ponto a listagem pode avangar (pressione seta para 
baixo) ou retroceder (pressione seta para cima). Se 
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desejamos dar um novo enderego inicial, pressiona- 
mos a tecia R, e se desejamos finalizar o programa, 
pressionamos a tecIa F. 

A coluna da esquerda, POS.MEM, fornece a posi- 
gao de mem6ria; a coluna do meio, COD.CONT, o 
c6digo do car^ter armazenado na posigao de me- 
m6ria indlcada na coluna da esquerda; e, finalmente, 
a coluna da direita fornece o car^ter do c6digo apre- 
sentado na coluna do meio. 

Em certo ponto, a partir da posigao de mem6ria 
17129, programa comega a listar o conteudo de 
mem6ria, onde ele mesmo est^ armazenado. Percebe- 
mos entao que a coluna do meio, algumas vezes, apre- 
senta o byte 0, o que indica o final de cada linha do 
programa. Mais adiante encontramos tres bytes 0, que 
indicam o fim da ultima linha, ou seja, o programa 
termina neste ponto. 

Se quisermos ir mals fundo em nossa "viagem" pa- 
ra saber quals posigoes de mem6ria armazenam o nu- 
mero das linhas, e quals s§o estas linhas, devemos 
acrescentar ao programa anterior: 

£5P0f) P=17129 

6530fl P1=PEEK(P)+PEEK(P+1)»256 

65301 XrPEEK(P+2)+PEEK(P+3)»256 

65002 IF X=64000 THEN END 

65310 PRINT P1,X 

65320 PsPl:COTO 65300 
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Para executarmos esta rotfna basta comandar: 
RUW 65000 (e apertar a tecIa RETURN), deste 
modo o programa imprime as posigSes de memdna e 
suas respectivas linhas. (Sevoce possui una impresso- 
(3 e de$eja o resultado impresso, troque o PRINT 
da linha 65310 por LPR1MT). 



EFETUANDO UM MERGE 

As pPsigSes 16548 (byte menos signfffcativo) e 
16549 (byte mais significatfvo), em decimal, contem 
enderego inicial do programs em BASIC que estd 
armazenado na mem6rla do micro; e as posigcSes 
16633 e 16634 contem o endere^o final do programa. 

Com esta$ informaq5es podemos simular, no grava- 

dor, uma rotina que s6 existe em equipamentos com 
disquete: o MERGE, ou seja, juntar dois programasr 
primeJro na mem6ria do micro, e o segundo no dis- 
quete. 

Se nos doi& pro^ramas existirem linhas denumeros 
iguais, MERGE colocard 3 linha dosegundo progra- 
ma em cima da linha do primeiro. As linhas que pos- 
suem numeros diferentess§o intercaladas. 

No MERGE que vamos simular, o segundo progra- 
ma terd que ser colocado no final do primeiro, inde- 
pendente dos seus numeros de tinhas, pois ^ necess^- 

rio que o segundo programa tenha, na sua primeira 
linha, um numero maior que o da ultima linha do 
primeiro. Isto permhir^ um resultado perfeito. 

Vamos efetuar o MERGE carreqando, inicialmente, 
primeiro programa e, atrav^s de PRINT PEEK 
(16633), saber quaJ o seu enderego final. Se o nume- 
ro apresentado for maior que dois, teclamos; 

P0KElfi6*B, PEEK t 16633) -2 iPOKEIfiS^i?, PEEK 
{16634) 

Se, ao contr^rio, o niimero for menor que dois. te- 
rn os, entSo: 

P0KE1 654&t PEEK ( 16633 K25>^: POKE 16549, 
PEEKtt6634)-1 

Carregarnos, agora, o segundo programa. Feito isto, 
restauramos o conteudo das posigCes de memdria 
16548 e 16549 digiiando: 

P0KEl654e, 233 iPOKE 16549, 66 

Se tudo isto foi feito corretamente, ao iistarmoso 
programa, veremos que os dois que estavam separa- 
dos, agora sSo um $6. 

Com estas informagSes podemos aproveitar melhor 

o DGT-100 que tern por dentrolugaresinexplorados... 

^ 

/Vtwton DuartB Brags Junior ftm cvrto A prognmnffa COBOL ptta 
OttBfma » t^ pFogrtm^cSo FORTRAN ptit Ufii^fSfiidMa Fsdtmi ^te 
Minas Gbtsk. $Su fntar^KV pof 9i9tr5nics cont^fOu ffO Cvrso dd f jcpJ* 
Taenia ffv^ntfg RamefS », t pttrtir du t980, vnm tpffCxtda ssus con/w- 
cimvttoi na in* de computt^o. Atutimtrmt ^ prttpri^t^^np de doit 
mferot: DOnoO * NEZSOOO, 



MICRO 5ISTEMASJunhD/B3 




djilFiCT^iOor Auicnzodfi 



idab 



5uprlmento$ para ^oc. Dados 



» FfTAS MAGN^CAS 
• DISCOS NMGNETICOS 



• DISKETES [8 e 5 V4) 

■ FITAS IMPRESSORAS (UNHA CCWRHA 
MINlflVtiCROS) 

• DATACAI?TOI5iDGE 

• ACESSOPKX (FTIQUETAS, tape SEEL, WAP 

AROUND, CAISeTEIS. REFLHrVOS) 

• CONSaTE NOSSOS PRKX^S 

• COrMOKX>ES ESP9CIAIS P/I5EVENCSDOPES 
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I NED I TO MD BRflSIL 

F»-a-rE:iNic i ai_ saF="-rut^Ri 

fiPRESENTfi 



CUR50 I^rTRaDUTORIa a linguabem basic 

ftUTD " DI DAT I CO ONDE O PROFESSOR E' 
PROPRIO MICROCOMPUTADOR.- 

iHcufii flflMufli EiPucftTJvfl m visuflis imim, z.iimitm 

% T07ALnENTf EH PD^tUSUES (, E 1 fftSKlTE IfE DUPIA HZl. 
CDnPOSTQ DE] 11 PROSRAHAS, |0 AULAS DIVIDIDftS Efl 2 PARTES CADA 
l« TESTES APOS DE UDA AULA E 2 EIMIES GERAtS. 

PASSQ A PASSQ mmi 4sr, tm ron pas hicros sa fanilia apple 
, I msi E m 3.3 , 

COHPAirVEL CQIIi APPLE IJ PLUS, KICRDENSENKD, POLVIMK,£ UMITftOM 

A yENDA NOB MELHOftES REVENDEDORES DE 
M I CROCOMFUT ADORES DO BRASIL 

FACA SEU PEDIDO HOJE ill PQTENClAL SOFTWARE, CK POSTAL^ 977 
CEP 13.104-CAPIPIHAS-SP Fi (OLf!) 31*5344} TELEX 1134327 \m K 




POrEnaAL SOFTWAEE 



Um programa para aqueles que estao querendo perder ou ganhar alguns quilinhos. 



Programe sua dieta 
(sem sacrificios) 



Pedro Luiz Ribeiro 



E 



ste programa surgiu a partir do momento que 
resolvemos experimentar, 1^ em casa, um re- 
gime mais convencional, a base de calorias. 
Um amigo medico orientou-nosa limitar a quantidade 
de calorias de cada refeigao e nos cedeu uma tabela de 
alimentos e seus respectivos valores cal6ricos. A 
tabela deriva de um estudo realizado pelo Hospital 
das Clinicas, de Sao Paulo. 

Quando comecei a elaborar os carddpios di^rios 
usando a tabela, percebi logo que nao era uma tarefa 
simples. trabalho envolvia consultas seguidas a se- 
te folhas mimeografadas, anotando nomes de alimen- 
tos, quantidades e a soma das calorias. 

Eu havia recebido meu Apple II tinha pouco tem- 
po e estava dvido para encontrar uma oportunidade 
de experimentar minha capacidade de programar em 
BASIC. Decidi entao fazer um programa, que depois 
de dois meses e alguns fins de semana, estava pronto, 
possibilitando-me produzir uma grande varledade de 
carddpios em alguns minutos. 



O PROGRAMA 

regime divide os alimentos em grupos, devendo- 
se escolher, para cada refei(pao, no m^ximo um ali- 
mento de cada grupo. programa apresenta no video 
um grupo de cada vez, permitindo selecionar um ali- 
mento de cada e determinar a quantidade que se pre- 
tende comer. A seguir, o programa computa a quanti- 
dade de calorias j^ comprometidas e mant^m o opera- 
dor informado do seu saldo diario, com base na quan- 
tidade di^ria pr^-estabelecida. Ao fim de cada refei- 
(pgo, programa imprime o carddpio e o total de calo- 
rias. Quando termina de computar as refeigSes do dia, 
6 impresso o total de calorias e o programa passa para 
uma nova folha. 

Para rodar o programa d necess^rio um micro com- 
patfvel com o Apple II (Unitron, Maxxi ou Microen- 
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genho) e uma impressora. programa menciona a 
Epson (linha 3595) porque foi desenvolvido nesta 
Impressora. No entanto, ele pode operar com qual- 
quer outra, desde que nas llnhas 4590, 4600, 4610, 
4620 e 4630, os cidigos sejam trocados pelos c6di- 
gos da impressora a ser utilizada. No caso de se usar 
a Epson, existe uma sub-rotina no programa que per- 
mlte alterar o tipo de letra. 

ALGUMAS EXPLICACOES 

A seguir, explicarei os principals pontosdo progra- 
ma: 

• Linha 460 — Para garantir a boa coloca(?ao do tex- 
to na folha, o programa precisa do numero de colunas 
da Impressora utilizada, atrlbuindo-Ihe a varl^vel NC. 

• Linhas 640 a 760 — Preenchem a tela com a tabela 
referente ao grupo definido pelas varidveis T e X, em 
duas colunas verticals, tabulando os numeros pela di- 
reita e o texto pela esquerda. 

• Llnhas 780 a 1060 - Aceitam a escoiha e atribuem 
aG$(i). 

• Linhas 1080 a 1400 - Tabela de medldas. Atri- 
buem a MS a cadeia correspondente a chave K. 

• Llnhas 1540 a 2000 - Aceitam instru(p6es quanto a 
quantidade do allmento seleclonado e informam o 
balanpo de calorias. 

• Linhas 2040 a 2460 - Atribuem a varidvel A$(i) as 
cadelas compostas dos nomes dos alimentos e chaves 
que identlflcam pesos e tipos de medldas utilizadas. 
Note que a linha 2130 n3o cont^m cadelas mas sim 
numeros decimals. No entanto, ela n3o sera lida pela 
linha 2100, uma vez que a mesma jd foi lida pela sub- 
rotina 8000 (veja linha 2040). 

• Linhas 2480 a 2580 - Atribuem a varl^vel Ql o to- 
tal escolhldo de calorias por dia. 

• Linhas 2640 a 2860 - Fornecem a RF$ a cadeia 
correspondente ^ refeipcTo escolhlda para, a seguir, ti- 
tular card^pio. 
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BCBUHDA FEIRA 




CAFE DA nWttt 




M-IrCHtC 


rasa 


HBIIDA 


DUE] JO PfUtTO 


«a 


1 FAT I A 


BUCD LWWUA 


12* 


1 COPO 


PAG DC CCHTEIO 


«ss 


1 FAT I A 


tEITE 


2M 


1 COPD 


WA&WIIM 


m. 


1 COUER DE CHA 


TOTM. DE CA.GRIA3: 


flLMOCO 




ALinEHTO 


PESO 


HEX^IDA 


M_FACE 


t4« 


t PRATO DE HESA 


BBPIIHFnE 


14« 


I PfiATO IK tIEEA 


ARRo; cnu 


*%• 


i COL^dl PE 30PA 


FEIJAO 


»i« 


I CIl-t£R PE SOFA 


CARNE DE VAQI 


•sc 


1 B]FE FEDia 


cnyui 


mh» 


1 LJMIDADE 


OLED 


■^ 


9 CCIL>«R DE CHA 4a» 


TOTM. DE CALDRIAS: 


420 

JW4TAR 




^trEMTD 


PESO 


HEDIOA 


NADO 


»7« 


2 UniDADE 1S> 




1W 


1 PRATD BOBREirCSA 


BATATA IHSL 


»4V 


2 UNIDADE (SJ 


PEBCADINMA 


um 


1 WrDAOE 


UVA 


«6« 


J CACHO 


n-ED 


M9 


3 COLHEFt DE CHA (3> 


TDTflt. DE CALORIAS: 


»3 




TOTAL DO dia: J MS 







Figura 1 — Exanpfo dto ar^ph prexStixido pefo progrsma. 

m Linhas 2880 a 3690 — Programa principal. Define 
a sequenda de manipulacp^o das tabelas, utilizando as 
sub-rot in as assinaladas, 

9 Lmhas 3640 a 3720 — Permftem quese volte atrds 
e recomece o dia, cancelando o card^pio jd elaborado. 

• Linhas 3760 a 4360 - Rotina de impressSo do car- 
d^pio rec^m-terminado. Note que as linhas 3860 a 
3960 permitem que se confira um tftuJo k folha [por 
exempiOr o dia da semana). 

• Linhas 4380 a 4580 - Permitem que se passe a 
urns nova refei<?ofo. pule para um novo dia ou saia do 
programa. 

• Linhas 4620 a 4940 - Sub-rotina j^ mendonada. 
qua parmite selecionar o tipo de impressSo quando se 
utilize uma impressora Epson. 

m Linhas 6000 a 6090 - Sub-rotina que toca acordes. 
Utilizada para alerter o operador quando o grupo que 
esriver sendo processado for desaparecer da tele. 

• Linhas 8000 a 8090 — Sub-rotina que introduz na 
raem6fia uma sub-rotina em linguagem de mdquina 
que permits gerar os sons utilizados pela sub-rotina 
6000- 
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A intorm^tica i a irjdO$tria que mais crescG 

no {Tjundo a quepaga o$ methores safarios 

& a unica carente de tecnicos 

espaciaiizados. 

FOflMACAO DE TECNICOS ESPECIAUZADOS 
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PROGRAME SUA DIETA {SEM SACRIFl'CIOS) 



120 

140 

i6e> 

1B0 
200 
220 
240 
260 
280 
300 
320 
340 

360 
3B0 
400 
420 
440 
460 

4G0 
S00 
520 

540 
550 
560 

5B0 
600 
620 
640 
660 
670 
660 
700 
720 
740 



Regime de calorias 



REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

HDtlE : 

PRINT 

PRINT 

PRINT 



REGirC DE 
CALORIAS 
POR 
P L RISE IRQ 



VTAB 8: SPEED- 120 
■■ESTE PROGRAMA PERMITE A FORtlACAO DE" 
■CARDAPIOS CC311 QUANTIDADE DE CALORIAS" 
■■CONTROLADA POR VOCE. ELE FOl ELABORADO 



760 
7B0 



PRINT "COM BASE EM DADOS OESENVOLVIDOE PELO" 
PRINT "HOSPITAL DAS CLINICAS DE SAD PAULO." 
PRINT "CDNSULTE O SEU MEDICO PARA DETERMINAR" 
PRINT "A QUANTIDADE EXATA DE CALORIAS DUE" 
PRINT "DEVE UTILIZAR EM SEU REGIME" 
VTAB 19: PRINT "DIQITE O NUMERO DE COLUNAS DE 
SUA ":: PRINT "IMPRESSDRA E APERTE <RETURN>" 
VTAB 22: INVERSE : PRINT " ";: HTAB 1 
INPUT NC: NORMAL 
IF NC ■ 4e OR NC > 200 THEN 460: REM LIHITAR 

LARG IMPR5S 
GOTO 2040 
PRINT : PRINT 

PRINT : PRINT - ESTOUROU' VOCE E3TA COM "IQRf 
" CALORIAS" 

PRINT : PRINT " FIM DO CARDAPIQ" 
FOR H = 1 TO 3500: NEXT 
GOTO 3600 
PRINT 

FOR I - T TO (X - 1) STEP 2:J <= 1 ♦ 1 
REM TABULAR PELA DIREITA 
IF I '. 10 THEN TV - 3 

IF I > =10 AND I < 100 ThCN TV = 2 
IF I > = 100 THEN TV = 1 
PRINT TAB{ TYUl" "; MID* (A»(I).7)!: PRINT 

TAB< 20 ♦ TV - (1 ♦ (I = 9)))J;" -J MID« (A« 
(J). 7) 
NEXT 
TZ o INT (S ♦ <X - T) / 2) 



800 IF TZ > IB Tf«N TZ - IB 

G20 G* - "": REM CRIAR NULL STRING 

840 VTAB TZ: PRINT "DIQITE NUTIERO DE SUA EBCOLM 

A- 
S60 PRINT 'PARA PULAR ESTE QRUPO APERTE A BARRA D 

D ESPACO" 
680 CALL - 956: REM LIMPAR LINHA 
900 VTAB TZ + 6: SET R«:AS - ASC (R*> 
920 IF VAL <G*t - AND AS - 13 THEN B20 
940 IF AS - 13 THEN 1020 
960 IF AS - 32 THEN RETURN 
980 IF AS < 48 OR AS > 57 THEN B20 

1000 G« ■= G* + R*: VTAB TZ * 4: PRINT 6«: GOTO 90C 
: REM ECO TECLD 

1020 G " VAL <G«): IFB>XORG<T THEN B20 

1040 G«<Y) - A«<G) 

1060 RETURN 

1060 K = VAL [ MID* <G«(V),Z,2)> 

1090 REM TA8ELA DE MEDIDAS 

1100 IF IS = I THEN M« = "UNIDADE" 

1120 IF K - 2 THEN M» - "PRATO DE MESA" 

1140 IF K = 3 THEN M« - "PRATO SOBREMESA" 

1160 IF K - 4 THEN M« - "PIRES DE CHA" 

1160 IF K =■ 5 THEN n* - "COLHER DE SOPA" 

1200 IF K ■ 6 THEN M« =■ "PRATO DE SOPA" 

1220 IF K " 7 THEN M» = "PIRES DE CAFE" 

1240 IF K - 8 THEN M« = "PEOACO" 

1260 IF K - 9 THEN M» ■= "BIFE MEDIO" 

1280 IF K - 10 THEN M* - "PORCAO" 

1300 IF K = 11 THEN M» = "FATIfl- 

1320 IF K - 12 THEN M» - "CACHO" 

1340 IF K - 13 THEN M» ' "CDPO" 

1360 IF K « 14 THEN n% ■ "PRATO DE CHA" 

1380 IF K - 15 THEN M« = "OX^^B DE CHA" 

1400 RETURN 

1420 O ■ VAL ( LEFT» <Q«(Y),11) 

1440 IF O = & THEN O - .5 

1460 IF AS = 32 THEN RETURN 

1480 IF O = 7 Th«N O - .73 

1500 IF " 8 THEN O = 1.5 

1520 HOME : VTAB 5 
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HARDWARE & SOFTWARE 
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IMPRESSORAS 

UNIDADES DE DISCO 

COMMODORE 

ATARI 400/800/ 

I.B.M. 



INCLUI: 

• 64K HAM 

• UNIDADE DE DISCO 

• MONITOR GREEN 





SOMOS 
BRASILEIROS 



S®MRIA 

900 LINCOLN RD., 
MIAMI BEACH, FL 33139 



TEL: 

672-0090 

co«P. 672-0091 

TELEX: 

6811413SONR1AMIAB 
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1S40 PRINT -ALIMENTO: "I HIM (8»(Y),7): PRINT 
1560 PRINT -PEBO "I HIM <B«<V1 ,4.3) I " eiW« 

AS": PRINT 
1380 PRINT "MEDIDA : "|0I" "tH* 
1&00 PRINT : PRINT 

1620 PRINT TAfl( S>"OUflNTAS PORCOES ?" 
1640 INPUT OP 

1660 OP<Y) - OP • 0:0C - INT <aP • Z> 
1680 aP«(Y) - LEFT* ( STR« (OP(Y} ) ,3) :QP(V) - VAL 

(OP«<Y)> 
17e« 0<Y) - OC 

1720 IF OC < 100 THEN TC - 30 
1740 IF OC > - 100 THEN TC - 2V 
1760 PRINT : PRINT : PRINT "ESTE VALE'i: HTAB TC: 

PRINT OCl: PRINT " CALORIAS" 
1780 QT - OT - OC:aR - OR * OC 
1800 IF OR > - 1000 T>EN TB - 28 
1B20 IF OR < 1000 AND OR > - 100 THEN TB - 29 
1840 IF OR < 100 THEN TB - 30 
1B6« IF OT < - THEN 560 
1880 IF OT > - 1000 THEN TA - 28 
1900 IF OT < 1000 AND DT > - 100 THEN TA - 29 
19^ IF OT < 100 ThEN TA - 30 
1940 PRINT : PRINT : PRINT -BOBRAM-LHE AINDA:"|: HTAB 

TA: PRINT OTi: PRINT " CALORIAS" 
1960 PRINT ; PRINT "TOTAL DESTA REFEICAO:"!: HTAB 

TB: PRINT ORi: PRINT " CALORIAS" 
1980 FOR H - 1 TO 4500: NEXT 
2000 RETURN 

2040 DIM A*<131}: SPEED- 295! 808UB B0«« 
2060 A«(0) - "0- 
2080 FOR L ■ 1 TO 130 
2100 READ A«(L) 
2120 NEXT 

2125 REM 2130 E 5U6R0TINA DE SON EH L/M 
2130 DATA If?, 200. 133, 1, 173,48,192,136,208 

,4,198, 1,240,8.202,208.246,166 .0.76.4.3,96 
2135 REM TABELA DE ALIMENTOS 
2140 DATA "202100TOHATE","10214BALFACE","103100A 

CELBA-,-102100ABRIAO", " 104100AIPO- , "1 14100ALM 

EIRAa","103100ASPARQOFRESCO", "601 100BER1NGELA 

-,"60105«eETERRABA","104070BROCOLI", ■' 1 040S0CO 

UVE- , " 1040a0COUVEFLGR- , " 102100ESCAROLA- , " 1031 

00ESPINAFRE" 



2160 



2170 
2180 



2200 
2220 



2240 
2260 



22B0 
2300 



2320 
2340 



2360 
2380 



DATA "20l070NABO",-l«>ll70PEPINa",-50111fit 
RABANETE" , " 103090REPOLHO". "601 I00CHUCHU' . - 10 
4080ABOBORA" . " 1 03 1 20ABD3F[ I NHA "."1021 50ACELGA " 
. -201100ALCACHOFRA","101050ALHOPORO". "601120B 
ERINQELA". ■'101P8«'BETERRABA". " 10310eiSROCOL I " 

DATA ■■1010B0CENOURA" 

DATA "103070CO11VE", " 1031 ICCDUVEFLOR" . "3050 
60ERVILHAEMLATA-, ■205040eRVILHAFPF.SCA" , "10615 
0ESCAROLA*'. "102140ESPINAFRE". " 10? I 30PALMI TDEM 
LATA", "201120PlMENTAa". " 1 07090OUI ABO" , "102120 
REPOLHO". "1070B0VAGEM"."I05010ARl OZ CRU" 

DATA "101040BA7ATA INGL" 

DATA "601030BATATA DOCE" , 1050I0FAR DE 

MANDIOCA" , "205010FAARDE MILHT" . " 105010FA 
R DE TRISO" . "1050I0FUBA", "10S.*50INHftME". " 
1 050 1 0MACARRAO " , " 608025MAND I OCA ".601 030MAND I 
OQUINHA". "601015PAO","10501i('SAQU", "105010TR1G 
O" 

DATA '■105010FEIJAO" 

DATA "105010ERVILHA SECA" . " 1050 10FE IJAO SO 
JA". "105010QRAO DE BICO". " 105010LENr ILHA" , "60 
9050CARNE DE VACA". " 1 10130PACALHAU SECO"."104 
120CAMARAO FRESCO" ," 1 01 05PCfiRNE DE F0RCD"."61 
0030CARNE SECA " . " I 1 0090CORACAO "."11011 0CORV 1 N 
A" 

DATA " 1041 20DOBRAD1 NHA" 

DATA "I11130DOURADO". " 107080FI6ADQ" . "1 1007 
0GALINHA". "110110GAROUPA". " I ) 0050L I NGUA" . "601 
080MIDLO","I10140MUSCULO". "10I060OVO", *■ 101 1 10 
PESCADINHA"."111030QUEIJO PRATO", "11 1030QUEIJ 
D FRESCO". "I U040REOUE1JAO". "1 11060RICOTA" 

DATA "1 11030MUSSARELA" 

DATA "601070RIM". "1 101 40ROBALD" . "10J040SAL 
SICHA", "2010B0SARDINHA FRESCA", " 1010T^SARD1NH 
A/OLED" . "20I060SARD/TOMATE" , "6li'060TAIN 
HA". "10I050BANANA NANICA", " t05i»20ABArATE" , "11 
1090ABACAXI ". "201090AMEIXAVERM'*. " 1 04i^B0AMORA" 

DATA 'I01040BANANA MACA" 

DATA "^CUaOCAJU", ■■I01060CAQUI". " 70 1 070CER 
EJfl". "101060F1GO". "104080FRAMtOESA". ■■1070?i0FR 
UTft DO CONDE". "I010606OIABA", "202100JABOTICAB 
A","101100LARANJA", "613I20SUCO LARANJA ", "1010 » 
90LIMA". "6eil0B0MACA", "1 I 1 070MAMAO" , "601070MAN J& 




O UP 1200/11 Parks e o modem analogico assincrono 
desenvolvido na medida certa paraos microcomputadores. 
Transmite em velocidades de ate 1200 bps 
nos modosduplex ou semi-duplex 
(a dois ou quatrofios) e pode ser 
utilizadoem linhas privativas 
ou discadas. Sua operapao e 
facil e seu custode aqmsicao, 




manutengao e f uncionamento e minimo.ainda mais 

que sua capacidade de transmissao equipara-se a 

de similares mais complexes. Entre na era da 

teleinformatica. Interligue seu micro ao de 

um amigo ou a um banco de dados. 

Utilize o UP 1200/11 Parks, a solu^ao 

simples e eficiente, dentro dos mais 

avan^ados parametros tecnicos. 



Parks - Equjpamentos Eletronicos Ltda. 

Porto Alegre: Av. Parana, 2335 - fones (0512} 42.5500. T!x. (051) 1043 • Sao Paulo: Rua Correa Vasquez, 51 

(ones (Oil) 549.4360. 572.7171. Tlx. (Oil) 23141 • Curiliba: Rua Carlos de Carvalho. 1766 - fone (041) 232.1814 

Tlx. (041) 5406 • Brasilia: CLRN 103 • Bloco A ■ Loja 37 - fonc (061) 225.0538. 
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PROGRAME SUA DIETA (SEM SACRfFltlOS) 





SA" 


3820 


IF RT» - "L" ThCN BOSUB 4620: IF RT» < > " 


2400 


DATA -10t060MARACUJA'' 




L" OR RT« < > "" THEN 3740 


2420 


DATA "111160MELANCIA","111220tCLAO","I04 


3830 


IF TF« < >""ORTF< >0 THEN 3880 




l20f1ORANQa", -60107WERA"."101080PESSE8O-,"10I 


3840 


HOME : VTAB 10 




100TflNG£Rlrtf»". "1 I2060UVA". ■'601023PAO" , "401020 


3850 


TF - 1 




BDLACHA NAIZErM", "2010I5BOL 9ALQADA" ,"tll 


3860 


PRINT "DIQITE TITULO DA FOLHA. POREM SE NA 




023PAO DC CENTEIO", "I 11023PAD X GLUTEN" 




OUIZER TITULO APERTE BlMPLESf«NTE A TE- CL 


2440 


DATA -111023PAO TRIBO INTSL" 




A RETURN": 


2Ai>B 


DATA -211020TORRADA".-n3200LEITE","7t31 


3880 


IW»UT TF« 




60LE1TE DE CABRA" , "81 330«LE I TE DESNTD" , "2 


3900 


TT - ( INT (NC) - LEN (TF«> ) / 2 




05030LEITE PO DESN" , •■205020LE I TE PO INTU" ," 


3920 


PR» l: PRINT : PRINT 




113200IOUGURTE/COALH" , " 1 13005l1ARBflRlNA", "1 


3940 


IF TF« - -- T»«N 4000 




13009OLEO- 


3960 


PRINT TAB( TT)TF« 


2480 


HOME : VTAB 11: HTAB 2 


3980 


PRINT : PRINT 


2490 


TF« - --:TF - 


4000 


TT - < INT (NC) - LEN (RF») ) / 2 


2300 


PRINT 'QLMNTAS CALDRIAS POR DIA 7<B00 A 3000 


4020 


PRINT TAB( rT)RF«: PRINT 




) - 


4040 


TA - INT ( (NC - 43) / 2) 


2320 


PRINT : PRINT : KTAB 13 


4060 


PRINT TAB( TA)"ALIMENTO-i: PRINT TftB( 16)" 


2340 


ir«>UT 01 




PE30"i: PRINT TABI 6>"MEDII>A" 


2360 


IF 01 < 800 OR 01 > 3000 THEN 2480 


4080 


FOR H - 1 TO (TA - 1): PRINT " "t: NEXT 


2SB0 


OT - 01 


4100 


FOR H - 1 TO 44: PRINT --"(: NEXT : PRINT "- 


2600 


HOME : VTAB 8: HTAB 8 




" 


2620 


OR - 


4120 


PRINT 


2640 


PRINT -ESCOLHA UMA Rt^tlCAO": PRINT ; PRINT 


4140 


FOR H - 1 TO 9 


2660 


CF* - "CAFE DA MANHA" 


4160 


K - VAL ( MID* (B*<H),2,2>> 


2680 


AL» ■ "ALMOCO- 


4180 


GOSUB 1100 


2700 


JT« - -JANTAR" 


4200 


IF G*(M) - -" THEN 4280 


2720 


PRINT TAB( 10)-1- "tCF«: PRINT 


4220 


TB - 30 - LEN <B*(H}):TC - 6 


2740 


PRINT TABi 10)"2- "|AL«: PRINT 


4240 


5* - " (5>-: IF 0P(H) > - 2 T»CN M« - M* + 8 


2760 


PRINT TAB( 10) "3- "(JT«: PRINT 




• 


Z7B0 


GET OP«:aF> - VAL (OP*) 


4260 


PRINT TABI TA) MID* <G«(H),7)i: PRINT TABt 


2B00 


IF OP > 3 OR OP < 1 T^EN 2600 




TB> MID* <G«(H>,4,3>|: PRINT TAB( TOOPlHIi: 


ZQ20 


IF OP - 1 TKCN RF« ■ CF*: SOTO 3190 




PRINT " "IM* 


2S40 


IF OP - 2 THEN RF« - AL» 


4280 


NEXT 


2860 


IF DP - 3 THEN RF* - JT« 


4300 


OF - 


2B70 


BOSUB 6000 


4320 


FOR H - 1 TO 9:0F - OF ♦ 0(H): NEXT 


2880 


HOME : HTAB 10 


4340 


PRINT : PRINT TAB( TA> "TOTAL DE CALORIAS: " 


2900 


PRINT "QRUPO 1- 23 CAL0RIA9" 




;OF 


2920 


X - 18:Y - i:z - 25;T - l 


4360 


PR* 


2940 


eOSUB 640: SOSUB 1080: BOSUB 1420 


43^ 


HOME : VTAB 3: HTAB 3 


2930 


BOSUB 6000 


4400 


PRINT -ESCXILHA unA OPCAO ABAIXO": PRINT ; PRINT 


2960 


HOfE : HTAB 10 


4420 


PRINT TAB( 10) "N- NOVA REFEICAO" 


2980 


PRINT -BRUPO 2- 23 CALORIAS" 


4440 


PRINT TAB( 10) "D- NOVO DIA" 


3000 


X - 39;y - 2:1 - 33:t - 19 


4460 


PRINT TAB( 10) "F- FIM" 


3020 


Q05UB 640: eOSUB 1080: GOSUB 1420 


4480 


9ET EO* 


3030 


BOSUB 6000 


4300 


FOR H - 1 TO 9:a*(H) - "":0(H) • 0: »«XT : REM 


3040 


HONE : HTAB 3 




ZERAR 08 0<H> E 0(H) 


3060 


PRINT -QRUPO 3- 35 CflLORIAS (ALIHENTO CRU) 


4520 


X - FRE (0) 


3080 


X - 33: V - 3:2 - 35: T - 40 


4340 


IF EO* - -N- THEN 2600 


3100 


BOSUB 640: GOSUB 1080: QOSUB 1420 


4360 


IF EO* - "D" THEN PR* 1: PRINT TAB* TA) "TO 


3110 


UUSUB 6000 




TAL DO DIA: "(01 - OT: PRINT CHR* (9)~E"|: PR* 


3120 


HOME : HTAB 10 




0: BOTO 2480 


3140 


PRINT "GRUPO 4- 33 CALORIAS" 


4580 


IF ED* - -F- THEN END 


3160 


X - 58:V - 4:Z - 33:T - 34 


4600 


BOTO 43Q0 


3180 


BOSUB 640: GOSUB 1080: GOSUB 1420 


4620 


HOME : VTAB 3: HTAB 3 


3190 


QOSUB 6000 


4640 


PRINT -ESCOLHA TIPO DE LETRA": PRINT : PRINT 


3200 


HOrC : HTAB 10 


4660 


PRINT TAB( 9)-l- COMPRIMIDA": PRINT 


3220 


PRINT -GRUPO 5- 75 CALORIAS" 


4680 


PRINT TABi 9)"2- ENFATIZADA": PRINT 


3240 


X . B7:V - 3:Z - 73:T - 39 


4700 


PRINT TAB* 9) "3- DUPLA IMPRESSAO': PRINT 


3260 


BOSUB 640: GOSUB 1080: GOSUB 1420 


4720 


PRINT TAB( 9)"4- COMBlNACAQ DE <2) E (3)": PRINT 


3270 


BOSU8 6000 


4740 


PRINT TAB( 9) "5- NORMAL- 


32S0 


HOME : HTAB 10 


4760 


INPUT Z: PR* 1 


3300 


PRINT -GRUPO 6- 50 CALORIAS" 


4780 


ON Z BOTO 4800,4820,4840,4860,4880 


3320 


X - H5:Y - 6:Z - 30:T - 88 


4800 


PRINT CHR* (9)"132F-[: GOTO 4900 


3340 


UUUUB 640: BOSUB 10G0: GDSUB 1420 


4820 


PRINT CHR* (27)-E"(: GOTO 4920 


3330 


GOSUB 6000 


4B40 


PRINT CHR* (27>-Q-;: GOTO 4920 


3360 


HOME : HTAB 10 


4860 


PRINT CHR* (27)"E- CHR* (27)-B-t: BOTO 4920 


3380 


PRINT "GRUPO 7- 63 CALORIAS" 


4880 


PRINT CHR* (27) -F" CHR* (27) "H" CHR* (18) i: 


3400 


X - I22:v - 7:Z - 63:T - 116 




GOTO 4920 


3420 


GOSUB 640: BOSUB 10B0: GOSUB 1420 


4900 


PR* 0: PRINT : PRINT "ATENCA01 LETRA MENOR, 


3430 


GOSUB 6000 




MAIS COLUNAS'-: FOR H - 1 TO 800: WXT : HtlURN 


3440 


HOME ; HTAB 10 


4920 


PR* 


3460 


PRINT "QRUPO B- 110 CALORIAS" 


4940 


RETURN 


3480 


X - i2e:Y - 8:Z - ii0:T - 123 


5990 


REM TOCAR ACORDES 


3300 


SOSUB 640: GOSUB 1080: GOSUB 1420 


6000 


FOR H - 1 TD 61 STEP 3« 


3510 


BOSUB 6000 


6020 


POKE 0,50 + H 


3320 


HUMb : HTAB 10 


6040 


POKE 76V, 30 • H 


3340 


PRINT "TEMPEROS - 30 CALORIAS" 


6060 


CALL 768 


3360 


X - 130:y - 9:Z - 30:T - 129 


60B0 


hCXT 


3380 


SOSUB 640: UUSUB 1098: GOSUB 1420 


6090 


RETURN 


3590 


GOSUB 6000 


7990 


REM 8U8ROTINA DE SOM EM L/H 


3600 


HOME : VTAB 10: HTAB 12 


8000 


FOR H - 1 TO 23 


3620 


PRINT -FIN DO CARDAP10-: PRINT : PRINT : 


8010 


READ Z 


3640 


PRINT TAS( 2)-0UER IMPRIMIR(I) OU RECOMECAR 


8020 


V - 767 ■*■ H 




<RI ?" 


8030 


POKE V,Z 


3660 


BET IR« 


8040 


NEXT 


3680 


IF IR« - "1" THEN 3740 


8060 


REM PARA ALTERAR FREOUENCIA-POKE 0,F(l-2 


3700 


IF IR« - -R" THEN CLEAR : HOME : GOTO 460 




33) 


3720 


BOTO 3600 


8070 


REM P<«A ALTERAR OURACAO-POKE 769,0(1-233 


3740 


HOME : VTAB 9 




) 


3760 


PRINT "WRONTE A IMPRESSORA E APERTE RETURN" 


8090 


RETURN 


3770 


IF RT* - "L- THEN GET U*: (MTO 3830 


60000 


REM PEDRO L RIBEIRO 


3780 


PRINT : PRINT "POREM SE TIVER UMA IMPRESSORA 


60010 


REM RUA SAO BENTO, 363 




EPSON E DESEJAR ESCOLHER D TIPQ DE LETRA, 


60020 


REM 01011 5 PAULO, SP 




APERTEA LETRA (L) " 


60030 


REM 239-5799 Wt 


3800 


GET RT« 


60040 


REM 0UTU8RO' 1982 £ 




ntes que voce va 

V/AfTll^Q f^yr\l|f^5lf Tola [Ware 6 ao mesmo tempo hardwares software, 

Vdl I lUo wy\|i#llwOI ■ eQuipamentoeoporlunicbde,sen'igo e confjabilidade, 
programa e consulta, atendinieiUo e novos produioti, emim. urn componenLe novo e indispensavei 
para o seu microcomputador. 

TotalWare ^ uma exclusividade CompuShop. a loja especiali?iida em microcomputadores 
onde voc^ encontra software, perilerict^. acessorios. a mais comoleta linha de livros e rcvistas 
nacionais e importados l>em como diskettes e formularios. alem ae cursos e assislencia 
tunica permanente. Tudo a pre<;os especialmente programados. 

Na Compi^hop a preocupagao ^ fazer com que %'oce tenha 
o microcnmputador cei1o, de acordo com as suas neceasidades. ^ ^ 

Mas apenas isso nao basta, Foi por isso que a CompuShop ^* . _ | . f *l_ I 

criou toaa uma infra-estrutura de apoio. 

Foi por isso que criou Total Ware. 



ClonpuShop 
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RuaOr ManoFtiTaz.37 CEPOHSa SfloPauly SP Tels (llli aiwjis; ■ 2U-*|W-TtEl^^ <mii366tl B^TE BH 

Abvrta dc Segumia a S^^Ui dus B ^s \^ lMir» e|io$ SabadcK das U as 14 hcras. 




Microengenho 




ompati'vel com o Apple II 
Plus, o Microengenho, fa- 

Ibricado pela Spectrum, de 

Sao Paulo, possui caracten'stlcas 
que tornam vers^til tanto para 
aplicagoes dom^sticas como co- 
merciais. Mem6ria RAM deat6 64 
Kb, alta resolugao grdfica, recursos 
de som e cores e Interfaces para 
disquetes 5 1/4" e impressoras se- 
rials demonstram a capacidade do 
aparelho para as mais variadas apli- 
catoes. 

HARDWARE 

A UCP do Microengenho basela- 
se no microprocessador 6502, da 
Rockwell, com cicio de 1 MHz e 
palavra de 8 bits. Ele possui 12 Kb 
de mem6ria PROM (10 Kb com o 
Interpretador BASIC e 2 Kb com 
o Monitor) e 16 Kb de RAM, ex- 
pans I'vel at^ 64 Kb. Seu teclado ^ 
constitui'do de 52 teclas ASCII, se- 
melhantes as da maquina de escre- 
ver. 

equipamento permite a utili- 
zatpao de gravador cassete comum, 
na velocidade de 1500 BPS. AI6m 
disso, apresenta interface para en- 
trada de atd oito disquetes de 5 
1/4", face e densidade simples, 35 
trilhas, 6 setores por triiha e 256 
bytes por setor. 

monitor de video pode ser 
um televisor comum preto e bran- 
CO ou a cores. display de texto 
comporta 24 linhas por 40 colu- 
nas, com 60 caracteres maiusculos 
ASCII, em matriz de 5 x 7 pontos. 
sistema trabaiha em dois modos 
gr^ficos; baixa resolugSo, com 
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1 .920 blocos (40 x 48} em 16 co- 
res no padrao PAL-M; e alta reso- 
lupao, com 53.760 pontos (280 x 
192). 

A interface de comunicagao se- 
rial 6 do tipo RS232C, com velo- 
cidade de 75 a 19200 bauds, aces- 
si'vel por BASIC, DOS e qualquer 
outra linguagem desenvolvida para 
Microengenho. A ela podem ser 
adaptadas impressoras seriais ou 
qualquer outro perif^rico que obe- 
depa ao padrao RS232C. 

Entre outros acess6rios impor- 
tantes, est^ o cart§o de expansao 
de mem6ria de 48 para 64 Kb e o 
Kit para adapta(;:ao de TV, dispen- 
sando o uso do modulador de RF. 

SOFTWARE 

Microengenho trabaiha com 
linguagem BASIC, Assembler (da 
UCP 6502) e quaisquer linguagens 
disponi'veis para seu sistema opera- 
cional, que e compati'vel com o 
DOS 3.3 do Apple II Plus. 

Como programas aplicativos, a 
Spectrum est^oferecendo o Micro- 
c^lculo, para controles de despe- 
sas e pequenos balancetes, o Mi- 
crodata, especifico para arquivos, 
o Editex, para processamento de 
textos, e Grafs^rie, formata- 
dor de gr^ficos para as areas de 
Marketing, Engenharia, Estati'sti- 
ca, Economia etc. 

Alem disso, todos os programas 
disponi'veis para o Apple II Plus 
rodam no Microengenho, o que 
abre um enorme leque de pers- 
pectivas. 



Complementando o equipamen- 
to, a Spectrum oferece ainda um 
Manual de Operagao e BASIC 
(trazendo os princi'pios elementa- 
res do Microengenho), um manual 
para o Sistema de Operagao em 
Disco e outro para a interface se- 
rial RS232C. 

Em uma configurapao mais ou 
menos completa, incluindo 16 Kb, 
duas unidades de disquetes, um 
vi'deo profissional e uma impres- 
sora de 132 colunas, o Microen- 
genho est^ custando em torno de 
Cr$ 3 milhoes e 600 mil, (prego 
de malo). 

A Spectrum fica na Rua Ver- 
gueiro, 3630, Tel. : (01 1 ) 570-3036, 
CEP 04102, Sao Paulo, SP. ■ 




niCPiDCEriTEPi 



ONDE VOCE ENCONTRA TUDO 
EM MICROCOMPUTADORES 



• Todas as principals marcas naclo- 
nals de microcomputadores 

• Curso de programa^So BASIC com 
apostila propria 

• MIcroblblloteca 

• Softhouse 

• Leasing e Credlto DIreto 



Microcenter Informaltca Ltda. 
RuaCondedeBonflm.229loJas3l0e312 
^TeL:264'OI43 TiJuca CEP 20520 



LPRINT 

impressao de qualidade 




A LPRINT viabiliza sua aquisigao dft 
uma imprBSsom da qualidadfi. 

LPRINT ^ um Kit quB » adapta a, 
gtialqu#r modalo de miquina ds 
dscrever IBM de esfera transfomaodo-a 
em JOM. Lmin«ssara, mantuido »u 
fUndnnamanto oiic^oaL [deal 
paia apLica90e3 qu« ne^sitdin qualidiule 
de escriu pot um baixo invesdmento, 

Permite gerar todos os cajacteres do 
tecUdo da m^uina (aceatos, cedlibd, 
Simbolos, ate), Propordojia 15 CPS. 
(vabcidedQ maxima da rndquioa IBM) o 



e na c 

PROJETOS ELETROnICOS 
IND COM LTDA 

Rua Coronel Quirino, 501 

Fone (0192) 520964 

CEP 1 3. 1 00 Campinas SP 

CAIXA POSTAL 1865 

Pt9(^ de tan^amentQ J 350 mil 



que dncroniza o» meonismosn diDunuindo 
$eu desgaste. 

LPRINT 6 comercializada em duai 
versOeslPARALELA CENTRONICS 9 
SERIAL RS^232-C/ELO DE CORREKTE 
(com Buffer de 4 K Bytes )^ 

LPRINT 6 um prodtJto E N AC; 
empresA que mrgtu para atender di 
oecfissidades do mercado de perifdricos 
a ^stemas dedicadoL 

Cooiulte a £ K A C para maiores 
informa^Oes mbre a LPRINT. 



Neste art/go, o propriet^rio de uma fazenda de gado fata 
dos resultados conseguidos com a utHizaQao do micro no controfe dos seus negdcios. 



Uma experiencia em 
fazenda de gado (2) 



WillemA. Dutilh 



u 



ma fazenda, seja ela de 
criatpao de gado de leite ou 
de corte, ^ uma empresa 
diversificada. Por isso, e necessario 
que fazendeiro tenha um espiri- 
to gerencial para queesta empresa 
apresente uma 6tima produpao e 
assim possibilite o maximo de ren- 
tabilidadeao seu propriet^rio. 

Numa fazenda, o pessoal mani- 
pula dados dos mais variadostipos: 
hist6ricos dos animals, producpao, 
reprodu(pao, alimentapao, flutua- 
(j^ao dos pregos do mercado de fer- 
tilizantes, ragoes, leite, reproduto- 
res, estoques de materia-prima — 
isso s6 para citar alguns. Alem dis- 
so, OS aspectos relatives a saude do 
animal tem que ser bem cuidados 
para evitar perdas de animais e, 
consequentemente, produgao. 

Os computadores, principal- 
mente os de grande e medio porte, 
tem ajudado os fazendeiros na ta- 
refa de administrar suas empresas 
i^ ha varios anos. Eles sao usados, 
por exempio, no controle da pro- 
dugao de leite, no fornecimento 
das listas de reprodugoes, relagoes 
de reprodutores dispomVeis com 
informagao de linhagem, produgao 
dos antecessores e f ilhas, etc. Essas 
informagoes, contudo, sao quase 
sempre do tipo htstorico e contri- 
buem pouco para as tomadas de 
decisao diarias. 




Na fazenda Pau D'Alho, um micro JP-01 manipula dados de mais de 400 animais. 



micro usado pelo pr6prio pes- 
soal da fazenda pode ser um auxi- 
liar poderoso, fornecendo justa- 
mente essas informagoes necess^- 
rias para o dia-a-dia da gerencia da 
fazenda. £ e provdvel que dentro 
de pouco tempo o micro invada o 
setor agropecudrio, como j^ ocorre 
em outras ^reas. Principalmente 
agora, com a disponibilidade de 
equipamentos nacionais a pregos 
acessi'veis. 



Na fazenda Pau D'Alho, por 
exempio, a poucosquilometrosde 
Campinas, Sao Paulo, estamos 
usando um micro para armazenar 
e processar informagoes gerais, au- 
xiliando-nos na gerencia diaria. 
nosso equipamento ^ o micro na- 
clonal JP-01, produzido pela Jan- 
per Engenharia, com 48K e discos 
para disketes de 5 1/4 polegadas 
de dupla densidade. Este equipa- 
mento tem capacidade para mani- 



52 



MICRO SISTEMAS, junho/83 



B 



3 
U 
5 
6 
7 
L9 



QUAL PROGRAHA? 



LISTAGEKS DOS ARQUIVOS-J 

LISTAS DE ATENgOES 

OU TRATAHENTOS 



ATUALIZAQAO DE DADOS 
DO REBAHH O 



MUDAN?AS DE GADO NO 
REBANBO 

RELATORIOS ^^ 

CORRE^OES 

TRANSFERENCIA - TRATAHENTOS 

TERMINADOS P/ ARQ. 

NADA HAIS 



VACAS- 



FICHA INDIVIDUAL 

(IMPRESSORA) 

BEZEKROS 

VACAS ELIMINADAS 

TRATAHENTOS ARQUIVADOS 

LISTA DE LEITE DIARIA 

LISTA DE VACAS 

NADA HAIS 



"1 = VACAS NO REBANHO 

2 ■ DIA DE ADigAO NO REBANHO 

3 = DADOS DE PRODUTI VIDADE 

4 ■ DADOS DA REPRODU^AO 

5 = MftS DE LACT.:H6DIA DIARIA 

DA PRODUgAO EH KG 

6 = LISTA DE LEITE (HENSAL) 
1_9 - NADA HAIS 



'I = VACAS PARA VERIFICAgiO 
DE CIO - DIA 1 

2 - VACAS PARA TOQUE - DIA I 

3 - VACAS PARA PARIR ENTRE 

DIA ) E 2 

4 - VACAS PARA SECAR ENTRE 

DIA I E 2 

5 = VACAS PARA TRATAMENTO 

(VIT A,D e E / VAC. DIARREIA) 

6 ■= VACAS PARA CONTROLE DE 

HAHITE - DIA 1 E DIA 2 

7 = VACAS INSEHINADAS ENTRE 

DIA I E DIA 2 

8 = VACAS QUE PARIRAM ENTRE 

DIA I E 2 
_9 - NADA HAIS 



"t = REPRODU^AO 

2 = CASOS CLINICOS (VACAS)— 

3 =■ CALENDARIO de VACINAgOES 

E TRATAHENTOS 

4 - FICHA INDIVIDUAL (vtDEO) 
_9 - NADA MAIS 



"1 - 

2 = 

3 = 

4 " 

5 - 

_9 = 



LISTAGEM DOS TRATAHENTOS 
LISTAGEH VACA(S) NtJHEROCS) 
VACAS TRAT.ADAS ENTRE 
DIA I E DIA 2 

VACAS A SEREH TRATADAS IIOJF- 
VACAS A SEREH TRATADAS 
ENTRE DIA 1 E DIA 2 
NADA HAIS 



H 



2 

3 

4 

5 

L9 



DIA DA CRIA 

CI05 E INSEMINACOES 

EXAHES DE PRENHEZ 

ABORTOS 

tranferGncia de EKBRIOES 
nada mais 



'1 - REPRODUCAO- 

2 =■ TRATAHENTOS (VACAS) 

3 - CALENDARIO de TRATAHENTOS 

E VACINA^OES 

4 - sSken 

3 - PRODUgAO DE LEITE 
l_q - NADA HAIS 



k: 



= TRATAHENTOS 
' TRATAHENTOS 
- NADA NAIS 



INDIVIDUAIS 
- SERIADAS 



t " BELAT6RI0 NO. 1 

2 = RELATOrIO no. 2 

3 - LISTAS DE COBERTUKAS E 

INSEHINAgOES 

4 - FICHAS DE NASCIHENTO 

5 - ESTOQUE D8 SfiHEN 

6 - NOTA?AO DE LEITE POR hES 
_9 - NADA HAIS 



Figura 1 
MICRO SISTEMAS, junho/83 
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UMA EXPERieNCIA EM FAZENDA DE GADO (2) 



pular dados de mais de 400 ani- 
mals, entre vacas leiteiras, novi- 
Ihos, bezerros e reprodutores. 

OS PROGRAM AS 

Os tipos de programas usados 
sao mostrados na figura 1 . Ao ligar 
computador, automaticamente a 
primeira s^rie (A) aparece no vi- 
deo com OS sete principals setores 
do sistema: (1) listagens dos ani- 
mals em geral, (2) listas de animais 
que necessitam de algumaatengao 
ou tratamento, {3} atuall^agao dos 
dados sobre os animais, (4) mu- 
danpas no rebanho (como adigao 
ou elimina(pao de animais), (5) re- 
lat6rios, (6) corregoes de arquivo e 
(7) um programa para arquivar da- 
dos que nSo sao necess^rios diaria- 
mente. 

A seguir descreveremos os pro- 
gramas mais usados desta s^rie A, 
ques3oo2(D)eo3 (G). 

ATENgOES 
ETRATAMENTOS(D) 

Os programas da s^rie D produ- 
zem listagens com a relapao dos 
animais que necessitam de algum 
tipo de atentj^o do criador durante 
um pen'odo indicado. 

A s^rle E (D1), por exempio, 
est^ relacionada comareprodupao. 
Dois exemplos de listagens produ- 
zidas pelos programas 1 e 2 desta 
s6rie s3o mostrados nas figuras 2 e 
3. A figura 2 cfiama atengao para 
as vacas que podem entrar no cio e 
precisam ser observadas com mais 
cuidado. A falta de observa(;:§o do 
cio pode atrasar a inseminagao e a 
prenhez, acarretando apreci^vel 
prejui'zo para a fazenda. A figura 3 
fornece a listagem dos animals que 
devem ser examinados para pre- 
nhez, que pode ser sollcltado 
pelo criador antes da visita regular 
do veterin^rio. 



VACAS QUE NAO CONSTAM NA LISTA N/ DEVEM 
SER INSEMINADAS SEM EXAME VETERINARIO 

VACAS fm(\ i^IFICACAO DE CIO M 01/11/82 o pAG. 1 



NO. now: 



2 BONNIE 
30 MARCELLA 
M NICA 
105 PERSIA 
ill SONATA 
221 TABITHA 
171 TAHOIA 
15^ TA«^A 
59 TIJUCA 
liO UNUARIS 
217 UPA 
103 URCA 
198 URGENCIA 
206 URNA 
83 URSA 
125 URTIGA 
10 USINA 
211 UVACA 



DIAS APOS X- REFraXJTOR X- PULOU? INSD1. 

CIO CIO INS PROX.CIO S/N REPROOUTDR COM). 



91 DIAS APOS ACRIA .../... 

rORA " 28 DIAS APOS CIO .../,.. 

23 2 JUPITER 1 ..,/.,. 

FORA '! 59 DIAS («^0S CIO .../... 

33 DIAS APOS A CRIA .../.., 

FOftA 'I 31 DIAS (fOS CIO .../,,, 

22 3 SILVER 1 .,,/,,. 

rORA I' 35 DIAS (f^S CIO .../... 

16 DIAS (V>OS A CRIA ..,/... 

NOVILHA P/ VERIFIC. DE CIO ,,./.., 

NOVILHA P/ VERIFIC. DE CIO ,../... 

NOVHJW P/ VERFIC. DE CIO .,./... 

20 3 STARLITE 1 ,.,/.., 
22 3 ,../... 

22 7 mnm 3 ,.,/.., 

21 2 .../... 
NOVILHA P/ VERIFIC. DE CIO .../,.. 
NOVILHA P/ VERIFIC. DE CIO .../... 

.../... 
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Figura 2 
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VACAS 


PARA TOQUE 


01/12/ez x« 


VACA 




X~ 


OIA 


DIAS COND. RESULT«)0 


NO. NWt REPROOJTOR INSEM 


. INSEHi 


APOS INS. 


TOQUE U/P 


21 LIHEIRA 


UNDOSO 


5 


17 OUT B2 


15 


. 1 i/t t < III 


29 MAORUGAD 


JAIME 


3 


26 SET 82 


66 


1 1 i/i 1 1 1 1 




35 Hisn 


ELEVAHO 


1 


27 SET 82 


65 


1 1 )/• • t It 




W NICA 


JUPITER 


1 


9 OUT 82 


53 


• t i/i 1 1 1 1 




102 PENSYLVA 


TRADITIO 


6 


16 OUT 82 


% 


1 ) i/« f < 1 1 




193 REGALIA 


ACHILLES 


1 


21 SET 82 


71 


t 1 t/i 1 1 It 




220 SAFIRA 


UNDOSO 


6 


1 OUT 82 


58 


1 1 t/t 1 1 It 




139 SEVILHA 


JUPITER 


1 


22 OUT 82 


10 


1 1 t/t 1 1 t • 




122 TALASSA 


UNDOSG 


3 


20 OUT 82 


12 


1 1 t/t 1 1 It 




171 T(V10IA 


SIHO 


1 


10 OUT 82 


52 


1 1 t/i 1 1 II 




27 TAVIRA 


JAIft 


5 


20 SET 82 


72 


1 1 i/t 1 1 t • 




117 TERENCIA 


SIl^ 


1 


16 OUT 82 


16 


1 1 i/i 1 1 11 




126 TULSA 


UWOSO 
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20 SET 82 


72 


1 1 t/t 1 1 11 
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20 OUT 82 


12 


1 1 i/i 1 1 It 
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12 OUT 82 


50 


t 1 t/i 11 II 
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10 OUT 82 


52 
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UMA EXPERISNCIA EM FAZENDA DE GADO (2) 



Pode-se observar que nas lista- 
gens j^ existem espagos para ano- 
tapao dos resultados. Essas anota- 
(?oes constituem as entradas no 
computador quando o criador usa 
OS programas de atualizapao. 

Os programas da s^rie F {D2) 
permitem listar os animals a serem 
tratados, com seu hist6rico de 
doenpas e tratamentos privies. Na 
fazenda Pau D'Alho, usamos estes 
programas especialmente para 
aquelas condipSes relacionadas 
com problemas de reprodu(pao, 
mas OS programas podem ser usa- 
dos para qualquer tipo dedoen(;a. 
Para vacinagoes ou tratamentos 
em geral, usamos o programa D3 
(Calend^rio de VacinapSes e Trata- 
mentos). 

Com estas series de programas 
temos um controle complete de 
todos OS dados relacionados com o 
hist6rico, estado atual e o ciclo de 
reproducpSo de cada animal. 

ATUALIZAQAO DOS DADOS 
DOREBANHO(G) 

Os programas da s^rie G sao pa- 
ra atualizapao dos dados dos ani- 
mais relacionados com a reprodu- 
q3o, produgSo e tratamentos. As 
figuras 4 e 5 mostram alguns 
exemplos da entrada dos dados de 
reprodu(p3o e a documentag§o des- 



FAZ. PAU O'ALHO CAIXA POSTAL 327 - 13100 CWINAS (SP) 11/01/83 

ATUALIZACAO DO REGISTRO DE REPRODUCAO 



COND. 

N 
H 
H 



m, 


NAit DIA DO TOOUE 


RESULTADO 


21 


LIMEIRA ll/l /83 


V 


29 


MAOfUGAD 11/1 /83 


P 


35 


MISTY U/1 /B3 


P 



VACAS PRENHES 

NO. NO* DIA ULTItIO CIO 



REPraOUTOft DIA PROXIMA CRIA 



2? HADRUGAO 
35 HISTY 


26/ysz 

27/9/82 


JAIHE 27/6/83 
ELEVAHO 28/6/83 






NO. NOHE 


DIA DO CIO 


REPROD. INSEM. COND. 


P(«T. 


NO. DOSES 


125 URTIGA 
198 URGEHCIA 
Figura 4 


1 /I 1/82 
3 /I 1/82 


SILVER H 
JUPHER N 


1 
1 


1 
1 



ATUMJZACAO DO REGISTRO DE CRIA 

wcAS NO ao 



NUhERODA W^ 

?35 
REPR'OOUTOR NO.DOSES 
? ELEVATIO ? 1 



30/11/82 



NOhE DA VACA 
MISTY ? 
?mi, INSEM. COND. 
? 1 ? ? N 



VACA (WTERIOR! 29 fW)RUG«) 30/11/82 



Figura 5 




O MELHOR SISTEMA DE CONTROLE DE ESTOQUE PARA CP-500 

- Coracferisticos fTsicos dos cadastres definidos pelo usudno 

- Filosofia conversdcional mterativo, possibilitando fdcil cperagdo 

- Consultas e atuaiizdgoes oltamenfe dindmicas 

- Elaboracdo de Orgamentos Pedidos com opcdo de Bdixo Autorndtca 

- Emissdo de retotfinos estatistico e odmimstrativos 

- DocumentogOo completa 

- Addptdvel o Micros compdtives com TRS80 Modelo III 

- Prego- 60 ORTNs 

-Temos tamb6m outros aplicativos, pard Microcomputodaes com sistema operacional CP/M 
-AdminJsfroQOo c^ clinicas e laboraldrios, APCP, etc. 

-Desenvoivemos olrido sistemas especitjcos sob encomenda. inclusive para dreas 
cientTlicas e grdficos. 

PSI - Projetos e Servipos em Informdtica Ltda. 

Rua Bardo do Triunfo. 464 ci, 31 - Brooklin -CEP 04602 - Sdo Paulo - SP. Telex • 1122966 -Teietone 531-9902 
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tas entradas, respecttvamente. Po- 
demos observar que todos os do- 
cumentos recebem um numero se- 
quenclal, o que facilita o fluxode 
informa(;ao. 

Finalmente, esta s6rie tambem 
apresenta programas que geram va- 
ries tipos de relatorios que dao 
uma visao geral da produpao e da 
produtividade da fazenda. 

CONSIDERAgOES FINAIS 

H^ mais ou menos um ano, MI- 
CRO SISTEMAS (NP 2) fez uma 
reportagem sobre o nosso trabalho. 
J^ estamos utilizando o micro na 
fazenda Pau D'Alho h^ aproxima- 
damente dois anos e podemos di- 
zer que as expectativas expressa- 
das naquela ocasiao foram satis- 
feltas. Alcanpamos uma maior ren- 
tabilidade, resultado de uma me- 
Ihor produtividade e menores per- 
das. Nao temos economizado pes- 
soal, mas o que 6 necessario fazer 
6 feito com mais facilidade e me- 
Ihor. Tambem podemos dizer que 
a aceitapao do uso do micro por 
parte do pessoal da fazenda foi 
excelente. 

Contudo, estamos cientes de 
que somente comeipamos a explo- 
rar o uso do micro na agropecu^- 
ria. Com os programas e equipa- 
mentos disponi'veis, seria possiVel 
controlar rebanhos muito maiores 
do que o nosso. Estamos implan- 
tando um sistema de contabilida- 
de especi'fica para as necessidades 
da fazenda, com calculos de custo 
de produgao de leite, para raciona- 
iizar especialmente osgastosdefor- 
ragem e ra(;ao concentrada. Espe- 
ramos tambem usar programas dis- 
poni'veis comercialmente como 
SUPERSCRIPSIT e VISICALC, o 
ultimo para ajudar-nos nas toma- 
das de decisoes na cirea f inanceira. 

Na realidade, a medida que nos 
familiarizamos cada vez mais com 
uso do micro, estamos descobrin- 
do novas aplicag5es e utilidades. 
Achamos que dentro de um future 
relativamente proximo, o micro 
ser^ tao comum nas fazendas co- 
mo agora ^ o trator. M 



WU/en A. Dutllh 4 agr&nomo e pecuarista em 
Campinas, SSo Paulo, e proprie^rlo da fazen- 
da Pau D'Alho. 
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Vgam o que a uni^o de 3 anprvsas sdlidas especializadas. podem ofenscer pars suprir o seu computador. 
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Partindo do concetto de modularidade, a Proldgica langa o CP-300, pretendendo 
cobrir a faixa entre o micro pessoal e o profissional. 



CP-300, novo membro na 
f amilia Prologica 



C 



om objetlvo de preen- 
cher segmento de mer- 
cado entre o microcompu- 
tador pessoal e o profissional, a 
Prologica ocupa-se do langamento 
de seu mais novo equipamento, o 
CP-300. Sendo totalmente compa- 
ti'vel, tanto em hardware quanto 
em software, com o CP-500, o 300 
nasce baseado em um conceito 
fundamental para um publico con- 
sumidor ainda em formagao: a 
modularidade. Na definigao do 
Gerente de Marketing para compu- 
tadores pessoais da Prologica, Joao 
Bittencourt, "o CP-300 e o com- 
putador que tem melhor desem- 
penho quando se comparam as va- 
rias capacidadese prepo. Al^m dis- 
so, ele possibilita ao profissional 
crescer junto com o computador, 
oferecendo uma solupao de conti- 
nuidade". 

Com mais este lan(?amento, a 
Prologica praticamente completa a 
sua familiademicrocomputadores, 
agora composta por cinco mode- 
los - CP-200, CP-300, CP-500, 
Sistema 600 e Sistema 700 — que 
atendem desde o iniciante na area 
at6 as pequenas e mediasempresas. 

SOFTWARE COMO 
ESTRAT^GIA 

Como CP-500, o CP-300 e di- 
retamente compatiVel com o TRS- 
80 Modelo III, da Radio Shack. 



58 



Assim sendo, o novo equipamento 
da Prol6glca j^ nasce com suporte 
a nivel de software, o que, segun- 
do Bittencourt, e um apelo im- 
portante junto ao publico consu- 
midor, "ja que atualmente o mais 
caro em um computador 6 o soft- 
ware, sem qual a maquina torna- 
se inutil". 

Quanto a possibilidade de con- 
correncia entre os dois novos equi- 
pamentos da Prol6gica, o CP-200 
e o CP-300, Bittencourt esclarece 
que isto nao devera chegar a acon- 
tecer porque o CP-200 tem um 
apelo forte a ni'vel de prego, na 
faixa entre Cr$ 150 e 200 mil. Ja 
publico que devera tender para 
CP-300, na sua opinlao, faz par- 
te de um segmento do mercado 
que escolhera o equipamento por 
sua modularidade e capacidade de 
expansao. 

CP-200 e dirigido principal- 
mente para quem esta comegando 
a conhecer a maquina e a aprender 
a linguagem, para isso tendo, in- 
clusive, as instrugoes de BASIC 
descritas no proprjo teclado. 
200 pode ser usado para orgamen- 
to dom^stico, cadastro de endere- 
gos, lista telefonica e jogos. Ja o 
CP-300 oferece a possibilidade de 
adaptagao de disquetes e impres- 
sora, que amplia suas possibili- 
dades em termos de aplicagoes 
profissionais. 



Com relagao ao CP-500, o novo 
micro se enquadra numa faixa de 
prego bem mais acessi'vel. Esta re- 
dugao de custos se deve a fatores 
como a nao inclusao de video em 
sua configuragao basica e teclado 
reduzido, sem a parte numerica 
que o CP-500 possui. A propria 
caixa de acabamento do produto 
foi um outro ponto que possibili- 
tou a reducao de custos. 

Segundo Joao Bittencourt, com 
mais este langamento a Prologica 
vem "reforgar sua poh'tica de su- 
prir todos os segmentos do merca- 
do, passando a ocupar a posigao 
da empresa que mais opgoes ofe- 
rece ao consumidor". 

Todos OS equipamentos da Pro- 
logica tem por base o mesmo mi- 
croprocessador, o que facilitara o 
usu^rio que, dentro de algum tem- 
po, sentir necessidade de trocar o 
CP-200 pelo 300. Como isto sera 
feito ainda nao foi definido, mas 
Bittencourt acredita que um sis- 
tema de trocas pode ser interes- 
sante para as proprias lojasdistri- 
buidoras. 

CARACTERl'STICASTeCNICAS 

CP-300 tem UCP com micro- 
processador Z80 e clock de 2 M Hz. 
Sua memoria inicial e de 48 Kb de 
RAM, podendo chegar ate 64 Kb 
com expansao que sera langada fu- 
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CP-300, que em configuragao basica vem com 48 Kb de RAM. teclado. conexao 
para video e interface para cassete, pode ser ligado a drive de at4 quatro disquetes e 
impressora. 



turamente, alem de 16 Kb de 
EPROM, onde reside o interpre- 
tador BASIC, e 1 Kb de RAM es- 
tatica, utilizada para buffer de vi'- 
deo. Em sua configuragao basica, 
CP-300 e apresentado com tecla- 
do alfanumerico de 54 teclas, co- 
nexao para televisor comum ou 
monitor de vi'deo, interface para 
gravador cassete e, atraves de um 



conector de 34 pinos na parte 
posterior do equipamento, o CP- 
300 pode ser ligado a controlador 
de drives de ate quatro disquetes 
de 5 1/4", dupla face e dupla den- 
sidade, portas paralelas para im- 
pressora e porta serial RS232C 
para modem. sistema operacio- 
nal do equipamento e compativel 
com odo TRSDOS. 



A formatagao da tela do CP-300 
e felta atraves de software que per- 
mite modos de 16 linhas com 64 
caracteres por linha, ou 1 6 x 32, e 
modo grafico com 48 pontos ver- 
ticais e 128 horizontals. grava- 
dor cassete ligado ao equipamento 
pode trabalhar com duas velocida- 
des, 500 ou 1500 bauds. No caso 
de utilizar disquetes, o usuario, ao 
comprar o primeiro drive, obtem 
junto controlador que opera os 
tres outros. Alem da expansao de 
memoria, a Prologica devera langar 
em breve tambem a impressora 
P-500 — que se adapta diretamen- 
te tanto ao CP-500 quanto ao CP- 
300 — , joystick e video proprio. 

Na configuragao basica, com- 
posta por CPU com 48 Kb de 
RAM, teclado, conexao para video 
e interface para cassete, o prego 
do CP-300 sera de aproximada- 
mente Cr$ 350 mil. A impressora 
P-500, com langamento previsto 
para o final do mes de junho, de- 
vera custar por volta de Cr$ 400 
mil. ■ 



Texto: Stela Lachtermacher 



Os Micros Chegaram! 



Cartoes Perifericos para APPLE. 
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t;fJiyAtfJ;fi>^ Cartao de expansao de memo- 
ria RAM de 16 Kb. 
cional para utilizar CP/ M . 
Cartao para aumentar a capacidade de 
termina para 80 colunas e 24 linhas. 
3 Cartao para programar 
e quei mar 10 tipos E PROM's de 24 pi- 
Cartao para de- 
, senvolvimento e teste de novos 
projetos. IIJhiJBiJl 131 Cartao de 
. Interface para 2 discos driver. 
llJIaiidsllJhJ Cartao de Interfa- 
ce para impressora tipo paralelo. 
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APPLE. CP/M sAo msfcas legisltadas de APPLE 
COMP. INC e DIGITAL RESEARCH COP USA. 



Uma visao mat's detalhada sobre como uma imagem e gerada 
ira nos ajudara obter dtimos resultados de uma TV comum adaptada a monitor de video. 



TV em monitor: como adaptar 



David Marco Risnil< 



ualquer que seja o apare- 
Iho de televisao, podemos 

fazer duas distinpoes b^si- 

cas entre seus circuitos, deacordo 
com a finalidade a que se desti- 
nam: circuitos de RF (radlo-fre- 
quencia) e circuitos de vi'deo, som 
e varredura. 

Os circuitos de RF — compos- 
tos por seietor de canais, amplifi- 
cador de frequencia interrmediaria 
de som e vfdeo e detetores de som 
e vi'deo — sao os elementos que 
traduzem o sinal de RF injetado 
nos terminals de antena para as 
formas simples de sinal de vi'deo 
composto e sinal de som. Ja os cir- 
cuitos de video, som e varredura 
sao OS que traduzem, finalmente, 



sinal de vi'deo composto e som, 
entregues pelos respectivos dete- 
tores, para as formas de imagem e 
Sudio. 

Com base nesta composigao, 
podemos afirmar que, em princi'- 
pio, qualquer receptor de televisao 
(seja ele em preto e branco ou a 
cores) pode ser adaptado para ope- 
rar como urn monitor de vi'deo e 
audio {figura 1). 

Antes por^m de entrarmos na 
adaptacao propriamente dita, veja- 
mos um pouco mais sobre a tecni- 
ca empregada no processo de gera- 
gao de uma imagem. Com isto nao 
pretendemos estender inutilmente 
esta materia, mas sim oferecer a 
base necess^ria para que ela seja 



plenamente compreendida. Pego 
desculpas aos que ja conhecem es- 
tes conceitos e autorizo-os a pula- 
rem as explicagoesa seguir. 

SISTEMA DE VARREDURA 

A imagem apresentada na tela 
de um receptor ou monitor de vi* 
deo nao e continua como a perce- 
bemos, mas sim composta por 
uma sequencia rapida de pontos 
formando linhas no sentido hori- 
zontal. Este processo denomina-se 
varredura horizontal. 

Para o padrao "M" de transmis- 
sao adotado no Brasil, o conjun- 
to de apresentagao de 262,5 li- 
nhas de varredura horizontal for- 



ANTENA 



V 



Audio 

EXT . 



@-= 
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CANAL 
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DE 
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VfDEO 



Figura 1 — Fluxo do sinal num receptor de TV. 
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SINAL DE VrOEO 



PULSOS 

DE 

SINCRONI SMO 

HORI ZONTAL 




NrVEL DE BRANCO 



--^ Ar-;^— — nFvel do preto 



UM PERFODO 
HORIZONTAL 




mn 



PULSO DE 

SI NCRON ISMOi 

VERTICAL 



Figura 2 — Apresenta^o das pulsos de sincronismo. 



ma um CAMPO. A formagao de 
um QUADRO, que por analogia 
podemos imaginar como sendo 
uma fotografia, e consequencia do 
entrelagamento das 262,5 linhas 
do segundo campo (I'mpar) com as 
262,5 linhas do primeiro campo 
(par), totalizando 525 linhas. Ain- 
da de acordo com o padrao "M", 
a duragSo da exibigao de um qua- 
dro e de 1/60 segundos, o que 
equivale dizer que durante 1 (um) 
segundo sao exibidos 60 quadros. 
A razao de percebermos a imagem 
da televisao sem descontinuidades 
deve-se a propriedade da retina em 
manter uma informagao mesmo 
depois que ela foi retirada — per- 
sistencia visual. Auxiliando s per- 
sistencia visual, temos a persisten- 
cia do phdsforo do cinescdpio 
(ph6sforo e o elemento que con- 
verte a energia do feixe de el6- 
trons em energia luminosa — bri- 
Iho). 

Os circuitos responsaveis pela 
varredura do feixe eletronico na 
tela, obedecendo ao padrao que 
acabamos de ver, sao os CIRCUI- 
TOS DE DEFLEXAO: varredura 
horizontal, responsavel pelo deslo- 
camento horizontal do feixe, e 
varredura vertical, responsavel pe- 
lo deslocamento vertical do feixe. 

A varredura horizontal e feita 
na razao de 15.750 vezes por se- 
gundo (15.750 Hz); e a varredura 
vertical ^ feita na razao de 60 ve- 
zes por segundo (60 Hz). Ao cor- 
reto desenvolvimento das linhas de 
varredura na tela denominamos 
TRAMA. 

SINCRONIZAQAO 

Para que uma cena se fixe na 
tela e necessario que haja rigoro- 
sa coincidencia entre o in I'cio da 



informagao de vi'deo para uma II- 
nha com o in I'cio da varredura des- 
ta linha. mesmo ocorre, por 
exempio, quando vamos iniciar 
um pardgrafo — o carro da maqui- 
na de escrever deve estar posicio- 
nado para o in i'cio da linha. 

Outra coincidencia a ser obser- 
vada diz respeito ao ponto de par- 
tida da sequencia das linhas hori- 
zontals. Aproveitando o exempio 
citado, podemos compara-lo ao 
desenvolvimento de uma carta, on- 
de as linhas sao escritas de cima 
para baixo, a partir do cabecalho. 
A isto chamamos de SINCRONI- 
ZAQAO: horizontal para as linhas 
de varredura e vertical para os 
campos. 

A informagao para sincroniza- 
gao esta contida no proprio sinal 
de video; ela e dada pelos PUL- 
SOS DE SINCRONISMO HORI- 
ZONTAL presentes durante o re- 
torno horizontal e pelos PULSOS 
DE SINCRONISMO VERTICAL 
presentes durante o retorno verti- 
cal. Retorno horizontal e retorno 
vertical sao os intervalos de tem- 
po "morto" gastos pelo feixe ele- 
tronico entre o t^rmino de uma li- 
nha (ou de um campo) e o in i'cio 
da(o) seguinte. 

Os pulsos de sincronismo hori- 
zontal e vertical sao distinguidos 
um do outro pela duragao de sua 
ocorrencia. pulso de sincronis- 
mo vertical tem duragao equiva- 
lente a tres linhas de varredura ho- 
rizontal. 

Com a finalidade de n§o inter- 
romper a sincronizagao horizontal 
durante a presenga do pulso de 
sincronismo vertical, este ^ serri- 
Ihado a intervalos de periodo ho- 
rizontal, mantendo desta forma o 



sincronismo em ambos os circui- 
tos (veja figura 2). 

Os pulsos de sincronismo, por 
estarem a um ni'vel de amplitude 
correspondente ao "mais do que 
preto", sao facilmente separados 
do resto do sinal de vi'deo pelo es- 
tdgio SEPARADOR DE SINCRO- 
NISMO. 

SINAL DE VIDEO 

sinal de video propriamente 
dito 6 a informagao que vai "di- 
zer" ao feixe eletronico qual o 
brilho a ser imprimido em cada 
ponto da tela. Nos receptores tri- 
cromaticos (a cores), alem da in- 
formagao do brilho (sinal de lu- 
minancia) existe a informagao da 
cor (sinal de croma). sinal de 
croma ou crominancia vem "codi- 
ficado" numa modulagao especial 
sobre uma sub-portadora de 3,58 
MHz. Tanto o sinal de luminan- 
cia como o sinal de croma (ambos 
totalizam a informagao de vi'deo) 
sao injetados na mesma entrada de 
video do receptor; a partir de en- 
tao, por um processo adequado, 
sao separados, cada qual indo ali- 
mentar o respectivo estagio. si- 
nal de crominancia, depois de co- 
aificado, ou melhor dizendo de- 
modulado, e novamente misturado 
ao sinal de luminancia e entao 
aplicado ao cinescopio tricrom^- 
tico. 

Nos receptores monocromaticos 
ou em preto e branco (alguns mo- 
nitores possuem o phosforo do ci- 
nescopio verde, emitindo brilho 
nesta cor mesmo que o aparelho 
nao seja a cores), somente o sinal 
de luminancia e processado. Po- 
r^m, a presenga do sinal de croma 
na entrada do video nao interfere ^ 
no circuito, podendo somente s 
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ser percebida uma ligeira modula- 
gao do feixe pelo sinal de 3,58 
MHz, como se uma rede bem fina 
estivesse esticada a frente da tela, 

Vamos por ora esquecer o sinal 
de croma e fixar a atencpao nas 
caracteri'sticas do sinal de lumi- 
nancia. Neste sinal, sao estipulados 
tres ni'veis referenciais de ampli- 
tude: 

• m'vel de branco; 

• m'vel de preto; 

• ni'vel mais do que preto. 

A amplitude correspondente ao 
niVel de branco relaciona-se o m^- 
ximo brilho no cinescopio; a am- 
plitude correspondente ao m'vel de 
preto, relaciona-se a ausencia de 
brilho no cinesc6pIo; e a amplitu- 
de correspondente a mais do que 
preto, que nao e mais produzida 
pelo cinescopio, e reservada aos 
pulsos de sincrontsmo horizontal e 
vertical. 

Na realidade, em televisao, faze- 
mos dlstintpao entre o m'vel de pre- 
to para a Imagem eon I'vel de pre- 
to para o pedestal de apagamento 
do retorno do feixe, sendo este ul- 
timo fixado em 5% abaixo do m'- 
vel de preto, garantindo a extingao 
do feixe. As tonalidades de cinza 
correspondem, entao, hs amplitu- 
des intermediarias entre os ni'veis 
de branco e preto, sendo possivel, 
desta forma, a reprodugao de to- 
das as gamas de brilho na tela. 

Somente para completar esta 
ideia, vamos dizer que e no sinal 
de luminancia que estao presentes 
todos OS detalhes finos de uma 
imagem, restando ao sinal de cro- 
ma a incumbencia de colorir, a 



grosso modo, esta cena. Por isso e 
possivel assistirmos a uma imagem 
em preto e branco do sinal de lu- 
minancia, mas e terrivelmente de- 
sagradavel assistirmos a uma ima- 
gem so do sinal de croma: neste 
caso, veremos grandes borroes de 
cor. A imagem colorida completa 
6 formada pela sobreposig§o das 
duas. 

Um sinal de vi'deo pode ser ge- 
rado por circuitos logicos a partir 
de uma informagao contida numa 
mem6ria, como 6 o caso de um vi'- 
deo-game ou de um computador 
domestico. Este sinal possui as 
mesmas caracteri'sticas que um si- 
nal de vi'deo para a televisao, pois 
ele sera produzido pelo mesmo 
processo queacabamosdeanalisar. 

Uma das diferengas que vamos 
encontrar em um sinal de vi'deo di- 
gital e quanto as passagens de ni'- 
veis do branco ao preto. Enquan- 
to na imagem da televisao essas 
transigoes sao suaves, no video 
digital, algumas vezes, so temosos 
ni'veis de branco e preto, como 
por exempio na apresentagao dos 
caracteres alfanum^ricos na tela: 
fundo negro (ni'vel de preto) e ca- 
racteres com brilho (m'vel de bran- 
co). £ claro que ^ possi'vel a exis- 
tencia de ni'veis intermediaries 
para tonalidades de cinza, mesmo 
em sinais digitals. Convem frisar 
ainda que um sinal de vi'deo digi- 
tal contem tamb^m os pulsos de 
sincronismo horizontal e vertical. 

normalizacoes 

Como dissemos, a entrada do 
amplificador de vi'deo situa-se logo 
apos o detetor de vi'deo, e e nesse 



Lista de material do adaptador 



m Dois transistores de sinal tipo 
BC547 iNPN) 

• Um transistor de sinal tipo BC557 
{PNPI 

• Um capacitor eletrolftico 22 M /16V 

• Um capacitor eletrolftico 100 u 
/25V 

• Um capacitor cerSmico tipo 22nF/ 
500V 

• Dois resistores 150 ohm — 5% 
CR25(1/8w) 

• Dois resistores 820 ohm - 10% 
CR25 (1/8w) 

• Um resistor de 1 K ohm — 10% 
CR25(1/8w) 



• Dors resistores 1K8 ohm - 10% 
CR25 (l/8w) 

• Um resistor 2K2 ohm - 10% 
CR25(l/8w) 

• Um resistor 2K7 ohm - 10% 
CR25 (1/8w) 

• Um resistor 3K9 ohm - 10% 
CR25 {1/8w) 

• Um resistor 15 K ohm — 10% 
CR25{l/8w) 

• Uma chave tipo H-H (de alavanca} 

• Um conector BNC — fSmea (profis- 
sional) ou RCA - fgmea (domestico) 

• Uma placade circuito impresso 



I 



Caracteristicas 

tecnicas do 

amplificador 



i 
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• Alimentaqao — 16^ V {poder^ ser 
diferente, pela substitui^o do re- 
sistor de queda) 

■ Consumo — 7,5 mA 

• Ganho de tens3o ~ 3,5 (nSo inver- 
sor) 

• Banda passante — faixa de vTdeo 

• Imped^ncia de entrada — 75 ohm 
(desbalanceada) 

• Sinal de entrada — 1 Vpp 

• Impedancia de safda — menor que 
75 ohm 

• Sinal desafda -3,5 Vpp 

, ponto que um sinal externo deve 
ser injetado. Existem certas nor- 
mallzagoes que visam a padronizar 
as entradas e sai'das de vi'deo de 
um equipamento generico. Sao 
elas: 

1 — a impedancia (Z) de entrada 
ou sai'da de video deve ser do tipo 
desbalanceada com 75 ohm; 

2 — a amplitude do sinal de vi'deo 
padrao nesse ponto deve ser de 1 
(um) volt pico-a-pico (1 Vpp); 

3 — a polarldade do sinal de video 
nesse ponto deve ser do tipo nega- 
tiva. 

Com isto garante-se o princi'pio 
de interconexao entre equipamen- 
tos distintos, sem a necessidade de 
adaptagoes intermediarias. Um dos 
itens fundamentals a serem obser- 
vados quando interligamos dois ou 
mais equipamentos d o que se re- 
fere ao casamento de impedan- 
cias. Como as entradas e sai'das de 
vi'deo sao padronlzadas em 75 
ohm, o cabo de ligagao deve ser 
tamb^m de 75 ohm; o termo des- 
balanceado sign if lea que o sinal 6 
tornado com referenda a terra, is- 
to ^, a maiha ou blindagem do ca- 
bo de 75 ohm € aterrada ao chassi 
do aparelho, correto casamento 
.de impedancias evita a reflexao do 
sinal e garante a maxima transfe- 
rencia do mesmo. 

Com respeito a polaridade do 
sinal de vi'deo, duas condigoes po- 
dem se apresentar (uma reversa da 
outra): polaridade positlva — signi- 
ficando que o mais alto ni'vel de 
amplitude deste sinal corresponde 
ao n I'vel mais do que preto (pulsos 
de sincronismo); polaridade nega- 
tiva — significando que o mais al- 
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to ni'vel de amplitude deste sinal 
corresponde ao n i'vel de branco. 

termo impedancia representa 
a carga que vai ser impostaao sinal. 
Fazendo uma analogia com a me- 
canica, ten'amos, no primeiro ca- 
so, um motor de ventilador glran- 
do sem a helice (carga nula = im- 
pedancia infinita) — sua rotagao 
poderd atingir ni'veis elevados, pro- 
vocando a destruigao do rotor. No 
segundo caso ten'amos o motor do 
ventilador girando com a helice — 
a resistencia do ar ao se chocar 
com as p^s da hdlice oferece uma 
carga (impedancia finita) para a 
qual motor foi dimenslonado 
(X r.p.m.). 

mesmo ocorre com as sai'das 
e entradas de vi'deo. Uma sai'da de 
75 ohm apresentara 1 Vnp de sinal 
se for carregada com 75 ohm de 
impedancia, caso contrdrio, a am- 
plitude de sai'da sera maior e have- 
rs reflexao na carga (parte do sinal 
nao ^ absorvida, o que a faz retor- 
nar). Na pr^tica, pequenas varia- 



goes na impedancia de um sistema 
sao aceltas e toleradas. 

PROJETO DE ADAPTAgAO 

Apos todas essas nogoes baslcas 
a respeito de um sinal de vi'deo, 
vamos analisar agora as opgoes pa- 
ra adaptagao de uma entrada auxi- 
liar de vi'deo em um receptor de 
televisao comercial. 

Ja sabemos que o sinal de vi'deo 
composto contem os pulsos de sin- 
cronismo responsaveis pela sincro- 
nizagao dos circuitos de varredura 
do TV. Portanto, ao injetarmos es- 
te sinal no receptor, devemos to- 
mar a precaugao de faze-lo num 
ponto onde o separador de sincro- 
nismo tenha condigoes de aprovei- 
ta-lo, caso contrario, devera existir 
uma entrada extra s6 para o sinal 
de sincronismo, quando a fonte de 
programa dispuser deste sinal em 
se parade. 

Em alguns receptorescoloridos, 
que utilizam Fl integrada, o sinal 
de vi'deo para o separador de sin- 
cronismo esta dispon i'vel numa » 

m 



Nao pare seu programa 
nem perca a memoria 
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t=^ P/T.R.C. 



Figura 3 — Esquema eMtn'co do amplificador 
para adaptagSo. 
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sai'da exclusiva para esta finalida- 
de. Nestes casos a adaptapao dara 
um pouco mais de trabalho, mas 
Dodera ser feita. 

Seria exaustivo descrevermos a 
solupao para cada caso, mas acre- 
dito que, atraves de um exempio 
prdtico, leitor interessado tera 
condipoes de executa-la em qual- 
quer receptor. Utilizaremos, por- 
tanto, receptor portatil preto-e- 
branco da marca Colorado, chassi 
CH-9, para bateria e rede eletrica. 

Neste receptor, o sinal de sai'da 
de vi'deo do amplificador de Fl (si- 
nal ja detectado), alimenta direta- 
mente a base do transistor SAIDA 
DE VI'DEO, excitador do cinesco- 
pio. A amostra de sinal para o se- 
parador de sincronismo ^ retirada 
por intermedio de um divisor de 
tensao colocado no coletor deste 
transmissor; desta forma, o nosso 
sinal externo pode ser injetado no 
transmissor. Conforme ilustra o es- 
quema do aparelho, o sinal da base 
deste transistor e do tipo negativo, 
e tern amplitude aproximada de 
4,0 Vpp. Assim sendo, vamos 

usar, para nossa adaptatpao, um cfr- 
cuito queapresente impedancia de 
entrada igual a 75 ohm, ganho de 
sinal de aproximadamente 4, e 
com caracterfstica nao inversora, 
ou seja, a polaridade do sinal de 
sai'da ser^ identica a do sinal de 
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entrada. Para esta finalidade utili- 
zamos um amplificador nao inver- 
sor, acoplado a um estagio de sai'- 
da do tipo seguidor de emissor, 
que oferece o sinal em baixa im- 
pedancia, pr6prio para excitar a 
base do transistor de video do re- 
ceptor (figura 3). 

A impedancia de entrada foi ob- 
tida pela associapao paratela de 
dois resistores de 150 ohm, 5%; 
para este caso podemos desprezar 
a influencia do circuito de entrada 
do amplificador, pois ela e de va- 
lor bem mais alto. 

A alimenta(?ao para este circui- 
to foi retirada do proprio TV, uma 
vez que seu consume e mi'nimo. 
Todos OS componentes foram 
montados numa unica place de cir- 
cuito impresso, inclusive a chave 
seletora e o conector para a entra- 
da de sinal. A ligagao entre Fl e 
sai'da de video sera interrompida e 
ambos os pontes, atraves de cabos 
blindados para video, serao leva- 
dos ate o circuito de entrada, pos- 
slbilitando o chaveamento TV/ 
MONITOR. A chave seletora, na 
posipao TV, coloca em curto es- 
ses cabos, permitindo ao sinal do 
detetor alimentar a sai'da de vi'deo. 
Ja na posipao MONITOR, a chave 
seletora conecta o circuito de en- 
trada ao amplificador de video do 
TV, reproduzindo o sinal externo. 



Ainda na figura 3, observem 
que a polarizapao da base do tran- 
sistor de sai'da de video (T301 ) 6 
fornecida pelo integrado da Fl; 
na posigao MONITOR, ela sera 
fornecida pelo seguidor de emissor 
do amplificador. 

Convem lembrar tambem que 
qualquer curto-circuito acidental 
no terminal de sai'da de vi'deo do 
CI da Fl danificara irremediavel- 
mente o integrado, sendo aconse- 
Ihavel, portanto, inspecionar mi- 
nuciosamente as Mgapoes. 

A fixapao desta plaquinha de 
adaptagao podera ser feita na par- 
te de tras do aparelho, num local 
mais conveniente. £ importante 
deixar a fiagao o mais curta possf- 
vel, evitando irradia(pao. 

Observapao: apesar de os apare- 
Ihos de vi'deo-game, microcompu- 
tadores etc. serem eletricamente 
isolados da rede, quando o TV for 
do tipo chassi vivo, sera conve- 
niente uso de um transformador 
de isolacpao para dar maior garan- 
tiaaosistema. ■ 



Diplomado pela FEI, SP, o Engenhelro Davfd 
Marco Risnik atualments 4 Diretor da Ristro 
Engenharia EletrOnica. Hi dez anos atua na 
iwa de video, tendo inclusive editado dois 
livros sobre videocassste. Na irea de micro- 
computadorvs, ministra cursos de BASIC em 
sua prdpria ssde, em SSo Paulo. 
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nicroScopus, 

computador 



bem acompanhado. 



Na hora de decidir-se por 
um microcomputador, diversas 
caracteristicas sac sempre 
analisadas: memoria, sistemas de 
aplicagao, utilitarios, 
possibllidades de expansao, etc. 

Mas isso nao basta para 
garantir um bom investimento. 
E precise avaliar cuidadosamente se 
o fornecedor tem uma estrutura 
capaz de oferecer uma assistencia 
adequada ao cliente. 

Todo profissional, ao analisar 
o microcomputador 
da Scopus, 
observa 
que as 

caracteristicas 
tecnicas 
do produto 
atendem as 
suas expectativas. 
Alem disso, 
o Microscopus vem acompanhado de 
varies servigos que a Scopus 
oferece aos seus cllentes. 

Mesmo antes de optar por um 
equipamento, o usuario ja pode 
contar com a assistencia da Scopus. 

Nessa primeira fase, ele 
recebe uma autentica consultoria na 
sua area de interesse, feita por 



s 




engenheiros e analistas experientes 
em teleprocessamento, aplicagoes 
comerciais e administrativas. Como 
resultado. a implantagao e a 
operagao de um sistema Scopus 
nao Ihe causarao problemas, pois 
OS analistas de suporte continuarao 
o planejamento desenhado 
na primeira fase. 

Mais do 
que isso, 
para que 
o usuario do 
Microscopus 
elimine 
suas diividas 
com maior 
rapidez, 
a Scopus 
mantem uma linha direta com os 
analistas de desenvolvimento e 
suporte: o servigo Disque Sistema, 
Atraves de um simples contato 
telefonico, os clientes que 
desenvolvem seus proprios programas 
ou OS que usam os sistemas de 
aplicagao Scopus podem obter uma 
consultoria sobre qualquer aspecto 
relacionado a operagao do 
Microscopus e seus sistemas. 

A Scopus oferece tambem um 
servigo de treinamento, realizado 




SCOPES 



atraves de 

cursos, 

que atendem 

as varias 

necessidades 

do cliente: 

da opera Qao 

do Microscopus 

ate a sua programagao 

em linguagens de alto nivel. 

Complementando esses servigos, 
o usuario tem a sua disposigao uma 
completa documentagao tecnica sobre 
OS mais diversos aspectos do 
equipamento e seus sistemas, v 

E para manter o Microscopus em 
permanente disponibilidade, o usuario 
dispoe de unna 
linha direta 

ci, 



S 



ccoPt/s 



assistencia 
tecnica 
Scopus , 
capacitada 
a atender 
prontamente 
o seu chamado, 
Toda essa estrutura montada pela 
Scopus tem um objetivo claro: oferecer 
um microcomputador sempre bem 
acompanhado de soiucoes completas 
e continuas aos seus clientes. 
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Com o TK82-Ca mao, entre no mundo da linguagem de mSquina 
enfrentando o problema da resequenciagao de programas. 



0. K. micro, voce venceu! 



Rui Cesar Torres 



odos OS dias tenho contato com computado- 
res que tem capacidade de processamento ini- 
maginaveis (se comparados com os micros) 
mas, mesmo assim, estes pequenos computadores se 
mostram, em certas situapoes, muito superioresaque- 
les equipamentos de maior porte. 

Foi esta a conclusao que tirei ap6s ter adquirido o 
TK82-C e excursionar na area de linguagem de ma- 
quina, estabelecendo uma maneira de enfrentar o 
problema da resequencisQao de programas. 

COMO TUDO COMEQOU 

Depois de alguns anos trabalhando com computa- 
dores, resolvi um dia que valia a pena comprar um mi- 
cro nacional e experimentar sua capacidade. Fui a 
uma loja, indaguei sobre prepo, recursos presentes e 
futuros, resolvi pagar para ver e comprei meu primei- 
ro computador. Sacudi a poeira da veiha televisao pre- 
to e branco, que estava guardada no quarto dos fun- 
dos, comprei um gravador cassete, arregacei as mangas 
e maosa obra. 

Ligar o micro e fazer o primeiro programa funcio- 
nar nao foi difi'cil, mas fiquei um pouco decepcio- 
nado quando parti a serio para o manual e comecei a 
perceber que algumas coisa.s citadas estavam fora da 
realidade. Nesta fase, minha experiencia com compu- 
tadores ajudou a descobrir um manual, em ingles, de 
um equipamento bastante parecido. Ao compara- 
los, percebi que o nosso tinha alguns errosde impres- 
sao flagrantes e tradupoes absurdas para determinados 
termos tdcnicos. 
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Programa ap6s programa, fui flcando cada vez mals 
fascinado com a capacidade do equipamento. De pro- 
gramas simples iniciais, evolui para mals complicados 
e todos funcionavam. BASIC dispomvel e reatmen- 
te irrepreensi'vel. £ bom frisar, no entanto, que eu ja 
possuia experiencia anterior com a linguagem BASIC, 
dai' nao ter encontrado muita dificuldade de assimi- 
lagao. 

A UCP do meu micro e um Z80 e e elaquem faz 
tudo. Desta conclusao a pensar no Assembler do Z80 
foi um passo curto. 

Com um pouco de leitura dos manuals, descobri 
que existem algumas instrugoes em BASIC, como 
POKE e USR, que me facilitariam o trabalho. Conse- 
gui um livro sobre Assembler e o resto... bem, o resto 
foi se arrastando, pois informagoes a respeito do real 
funcionamento do equipamento nao existem a dis- 
posigaodo usu^rio. 

Como fala MICRO SISTEMAS em seu editorial de 
novembro de 1982, o publico merece informapSes 
mais objetivas dos fabricantes, do que simplesmente a 
imensa quantidade de jogos que inundam as telas de 
nossos micros. 

LINGUAGEM DE MAQUINA 

Prosseguindo em minhas experienciascom TK82-C 
na (jifi'cil area da linguagem de m^quina, realizei um 
trabalho que, apesar de nao ser o mals adequado pa- 
ra a solupao do problema de resequenciagao de pro- 
gramas, desperta interesse por ser perfeitamente rea- 
lizavel no TK, so dependendo de maiores informa- 
goes. Sendo assim, vamos a ele. 
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Imagine que vocStenha o seguinte programa: 

2 DIM A(10) 

3 FOR M=l TO 10 
* LET A(N)= A»»2 
10 NEXT N 

13 LET X^O 
1* LET X=X+1 

15 IF X>10 THEN GOTO 30 

16 IF N-2 • INT (N/2) <> THEN GOTO 1** 

17 PRINT A(N) 
23 GOTO 1* 

30 STOP 

Primeiramente, digite como ilnha 1 , o seguinte pro- 
grama : 

I REH ESTA Area estA reservada para 

QUE NELA SE3A COLOCADO PROGRAMA DE 
RESEQUENCIACAO OE SUA FONTE 

Ao final deste programa, digite osseguintes coman- 
dos: 



9000 


CLS 


9100 


FOR N = 16514 TO 16565 


9200 


INPUT X 


9300 


POKE N,X 


9'»00 


SCROLL 


9500 


PRINT M;"-";X 


9600 


NEXT N 


9700 


CLS 


9800 


PRINT AT 10,0;"FIM DE ENTRADA" 



Agora comande GOTO 9000. A tela ficara limpaeo 
cursor indicara o pedido de entrada de dados nume- 
ricos. Comece, entao, a digitar a seguinte sequencia de 
numeros: 



33 
12 
64 
78 
35 
70 
237 
91 



180 

64 

33 

10 <^ 


25 

34 
160 



64 


115 


43 


64 


84 


35 


25 


151 


93 





17 


237 


42 


94 


4 


66 


178 


35 





218 


64 


86 


25 


136 


114 


43 


34 


64 


35 


43 


178 


201 



125 
64 
(*) 




Caso voce erre na digitagao de algum numero da 
lista, primeiro anote o numero que apareceu na tela, 
na frente daquele errado.e continue a digitar ate apa- 
recer a mensagem FIM DE ENTRADA. A seguir, co- 
mande POKE x,n, onde x e igual ao numero que voce 
anotou e n valor correto da lista. Proceda desta ma- 
neira para todos os numeros em erro. Apds todos os 
dados terem entrado corretamente, comande LET X 
= USR 16514. Imediatamente ap6s o NEW LINE de- 
ve aparecer a notagao 0/0; comande, entao, LIST e 
seu programa estara resequenclado, come?ando da 
Itniia 10 com Incremento de 10. 

Note, entretanto, que algumas alteragSes prectsam 
ser feitas nos comandos GOTO, pois estes estao apon- 
tando para linhas erradas. Este 6 um dos pontos de 
deficlencia deste programa, sendo assim, gostaria de 
sua colaborapao no sentido de supera-lo. Pense co- 
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migo: por que comecpar da Hnha 10, resequenciando 
de 10 em 10? Ao inv^s disto, altere os valoresassina- 
lados na lista e o incremento desejado, execute ou- 
tra vez e veja se funciona. 

que foi feito na realidade? Bem, vamos por par- 
tes. A instrucpao POKE x,n do BASIC permite que vo- 
ce coioque em um endere(po de memoria x o valor de 
n. Entao, o que o nosso programa de 9000 a 9800. 
fez, foi colocar a partir da posigao de memoria 16514 
OS valores constantes da lista. Estes valores nada mais 
Scio do que Instrugoes em cbdigo de maquina do Z80. 

Voce tambem pode notar que, ao listar o progra- 
ma, apos a resequenclapao, o comentarlo da linha 10 
esta cheio de caracteres do TK82-C. Isto acontece 
porque o BASIC do TK82-C, ao darmos o comando 
LIST, interpreta a nossa lista de numeros, nao como 
OS comandos de Z80, mas sim como caracteres a se- 
rem impresses. 

nosso programa, na linguagem do Z80, so foi 
realmente executado quando demos o comando 
USR 16514. Este comando significa, para o BASIC 
do TK82-C, executar as Instrugoes em codigo de md- 
quina que estao localizadas a partir do enderego 
16514 e e exatamente a partir deste endereco que co- 
megamos a colocar a nossa lista de numeros. ■ 

m 



Rui Cesar Torres 4 profissionaf de processamento de dados com dez 
anos de atua^o na drea. Atualmente trabaiha na Cia. de Cigarros Souza 
Cruz, na Equipe de Suporte de Software em equipamento IBM 4341- 
MG2. 




SEU 

MICRO TEM ASSISTlNCIA 
TiCNICA DE GRANDE PORTE. 

Ha mais fle 1 2 anos a MS presta atendimento a uma serie de empresas , 
no conserio e manuiengao de computadores dos mais diversos porles 
e marcas. E toda essa bagagem tecnica esta tambem a sua disposigao, 
garantindo o desempentio ininterfupto do seu micro. 

• Socorro urgenle teietonico - chamou-chegou! 

• Checl<-ups preventives 

• Reparos 

• Substituigao de pepas e unidades peritericas originais 

• Substituigao do microcomputador 

• Contratos de assistenda tecnica a empresas e particuiares- 
Na MS a vida de sua maquina esta garantida. 

MS - Assistencia Tecnica a 
Microcomputadores 

RuaAstolfoAraup, 521 -Tel. 549-9022 
CEP 04008 -S. Paulo - Capital 

Representante no Brasil da: MDS ■ Mohawk Data Sciences/MSI - Data Corporation 




Transforme o seu D-SOOI numa m^quina de escrever que nao deixa vo(^ errar. 



Datilograf ando no micro 



Ivo D'Aquino Neto 




Este programa permite que 
voce utilize o D-8001 co- 
mo uma m^quina de escre- 
ver convencional, com a vantagem 
de, em caso de erros, voce poder 
apagar letras ou palavras batidas 
erradas, antes que o texto seja im- 
presso. unico inconveniente ^ 
que texto nao apresenta acentos 
nem cedilhas. 

Para utilizar o programa, voce 
deve proceder da seguintemaneira: 

• utilize teclado do D-8001 co- 
mo se fosse uma maquina de es- 
crever convencional; 

• para escrever letras maiusculas, 
pressione simultaneamente a letra 
ea teclaSHIFT; 

• para apagar o ultimo car^ter 



digitado, pressione a tecia BACK 
SPACE; 

• se voce pressionar simultanea- 
mente as teclas SHIFT e BACK 
SPACE, ocorrera o retorno rapido 
do cursor e o apagamento dos ca- 
racteres por onde o cursor for pas- 
sand o; 

• para pular uma linha no video, 
pressione NEW LINE; 

• pressionando-se a tecIa CTRL, 
ocorrera oavangordpido do cursor; 

• para Imprimir conteudo do vf- 
deo, pressione a tecIa F4. Se hou- 
ver linhas em branco entre a posi- 
ipao final do cursor e o ultimo ca- 
rdter do vi'deo, ao ser presslonada 
a tecIa F4, a impressora pular^ li- 
nhas ate se posicionar na linha on- 
de se encontrava o cursor; 



• para reimprimir o texto, pres- 
sione a tecIa F4; 

• para fazer a impressora avanpar 
uma linha, pressione simultanea- 
mente as teclas SHIFT e F4; 

• para apagar os caracteres da te- 
la, pressione as teclas SHIFT e F3. 
Importante: antes de iniciar a im- 
pressao de novas linhas, tambem e 
necess^rio pressionar as teclas 
SHIFT e F3. Se isso nao for feito, 
tudo aquilo que permanecer na te- 
la ser^ impresso. 



Engenheiro Eletrdnico, graduado em 1973 pe- 
la E.T.F.C.S.F., Ivo D'Aquino Neto ^ respon- 
s^vel pela expansSo e implantafao do sistama 
de tslesupervisSo dos equipamentos de trans- 
missSo, comutapSo, forpa e redes na TELESC 
— Te/acomunicapdes de Santa Catarina S. A. 
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95 CL3:PRIKTTAB{10) "DATILQiSRAFI A VERSAG: 14/01 / 19S3" : F0RK=lTriRO0? NEXT 

100 C:LEAR1100:CL5:PRTrJTTAB(r7) "## D O T I L O G R A F I A tttt" 

110 PRINTiPRirjT: print: print: FRINTTAE (25) "VOCE DESEOA IN?.TR1 rriES :=;/N ' 

120 Y*=INKEY$: IFYS=" ■'THEN120 

130 IFY*="S"THEN500ELSEIFY*<>"N"THEN120 

140 CLEAR1500: 

150 CL3: 11=1 5360: HH=1 

160 I=II 

170 POKE I >95 

ISO Y*=INKEY«: IFY*=" "THENISO 

190 Y=ASCCY$) 

200 IFY=8P0KEI,32: 1=1-1: IFI >=IITHEN170ELSEI=I I : GOT0170 

210 IFY=13P0KEI.32: IFK 163201 = INT ( (I-I I ) /64) .t:64f 15424: G0T0170ELSE170 

220 IFY=94THEN2000 

230 I F Y= 1 26LF>R I NT " " : GOTO 1 ^0 

235 IFY=10THEN1000 

240 I FY= 1 25i::LEAR 1 500 : SOTO 1 50 

245 IFY=24THEN1500 

246 IFY<>127THEN250ELSEHH=HH*-1:V=05:qoT0170 
250 IFY>=65ANDY'::>90ANDHH< >- 1THENY=Y-!-32: G0T0270 
260 IFY>=97ANDY<=122Y=Y-32 

270 POKEI,Y: 1=1+1: IFI<=163S3THEN170ELSEI=163S3: 8nTni70 

500 CL?:PRINTTAB(27) "INSTRUCOES: 

510 



PRINTTAB(5) "1, 

SCREVER comum; 
520 PRINTTABC5) "2, 



UTILIZE TECLADO NDRMALMENTE. COMO SE FOSSE UMA MAQUINA DE E 



330 PRINTTAB(5) "3. 



AVANCO RAPIDO PRESSIONE A TECLA <CTR'L>; 

RETORNO RAPIDO PRESSIONE SIMULTANEAMENTE AS TECLAS <SHTF 



PARA 
PARA 
T> <BACK SPACE >; 

540 PRINTTABC5) "4. COMPLETO O VIDEO> ME3M0 DEVERA' SER DESCARREGADH PARA A IMP 
RESSORA, PRESSIONANDO-SE A TECLA ■:;F4>; 

550 PRINTTAB(5) "5. PARA AVANCAR UMA LINHA NA IMPRESSORA, PRESSIONE SIMULTA-NEAME 
NTE AS TECLAS <SHIFT> <F4>; 

560 PRINTTAB(5) "6. PARA REIMPRIMIR O TEXTO APRESENTADO NO VIDEO PRESSTfiNE A TECL 
A <F4> TANTA3 VEZES QUANTAS DESEJAR; 

570 PRINTTABC5) "7. PARA APAGAR O VIDEO E CONTINUAR COM A IMPRESSAO, PRESSIONE <S 

HIFT> <F3>; 

575 PRINTTAB{5) "S. PARA (DES)TRAVAR A TECLA ::SHIFT> PRESSIONE 

5S0 PRINTe977, "<<<PARA PROSSEGUIR PRESSIONE QUALQUER TECLA>>->' 

T:PRINT@960. STRING* (63, 32) ? : F0R.J=1T03: NEXT 

590 Y*=INKEY$: IFy$=" "THENSSOELSEr^O 

1000 IFPEEK(i4463)<>16THEN170ELSEPOKEI,32:I = I + l:lFI< = 163R3THEN1010ELSEI = 16-^R-^ 
POKE! , 95: GOTO 1000 

IFPEEK (14463) < >32THEN170ELSEP0KEI , 32: T:..i-i : IFr-=15360THEN1510ELSEI=-153A0 

POKE I .. 95 : GOTO 1 500 

POKEI > 32: FORXX=15360TOISTEP64: Z*=' 



;SHIFT> <F1>. "; 
:FORJ=1T01000:NEX 



1010 
1 500 
1510 
2000 



2010 FORY%=OT063:Z*=Z$-^-CHR$(P*EEK(X>:■^Y:/.)):NEXTY%:LPRINTZ$:NEXTX•-C:GOT0170 



POR ESSA 

Uma novidade que parece um acha- 
do. SONAR/INSPEC. 

Voce recebe resumos seleclonados 
pelo computador, dentro do amblto 
exato do seu interesse — pontual- 
mente a cada 15 dlas- 

Veja alguns aasuntos abordados: 



VOCE nAo esperava... 

aplicagCes. tecnologla de software, 
controle de processes, automaQdo de 
escpltorlos, mlcroeletronica, para ci- 
tar apenas alguns. 

Tudo Isso pelo pre^ da assinatura 
de uma revista: 5 ORTN's por ano. 

E voce ainda pode fazer uma expe- 



riencla: recebe o servlgo durante dols 
meses, sem pagar nada. 

E facU: Telefone. escreva ou en vie 
. um telex ao CIN. 

"^ ComiMfc ftocional d* En*rgla NudMT 
Cantra d» lnfonna9A«« Nt«clMf«a 
Rim G«n*nl Scvariano, M 
if^fir;^ 2Z2MRIodaJM«taRJBrMll 
^i£=Mlk T*l.: (0211 2t6-IHSTataM 1021) 212H CNEN BR 
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Pergunta - Tenho urn TK 82C e gos- 
taria de aprender a montar programas 
em BASIC com sub-rotinas em Assem- 
bler. Para isso, preciso de algumas in- 
forma^oes que o manual do TK nao 
fomece. Qua! a regiao da memorla usa- 
da para depositar as cade/as contidas 
nas f'nstruQoes REM e PRINT? fx/ste 
uma regiao na memoria do TK 82-C 
(16 Kb) para se depositar a sub-rotina 
sem correr o risco de alterar algum re- 
gistro importante? Quais os comandos 
para, no decorrer de uma sub-rotina 
em Assembler, se encontrar com uma 
informagao pelo Pelade e se receber 
uma informa^ao no video? Existe di- 
feren^a entre as InstruQoes do Z80 da 
Zilog e o 8080 da Intel? O que faz 
realmente a fun^ao \JSR? Como retor- 
nar ao programa principal em BASIC? 
(Joao Carlos Teixeira, PR) 
MICRO SISTEMAS - Os textos das 
instrucoes REM e PRINT sao armaze- 
nados na propria Mnha da instrucao. 
Portanto, tais textos estarao numa irea 
a partir do endere^o 16.509, isto e, na 
regiao de programa. 

Quanto d regiao de memoria para se 
depositar a sub-rotina sem perigo, a 
resposta e afirmativa: normalmente 
utilizam-se as mais altas posipoes da 
memoria. No entanto, e necessSrio que 
se altere uma vari^vel do sistema, a 
RAMTOP, localizada na posipao 
16.388. Tal vari^vel ocupa 2 bytes e o 
seu conteudo indica o enderepo da pri- 
meira posipao de RAM nao disponCvel 
ao BASIC. Normalmente ai' encontra- 
mos o enderepo da primeira posigao 
fora da memoria (18.432 na versao 2 
Kb ou 33.792 na versao 16 Kb). Se 
voce colocar urn valor menor do que 
este em tal varifivel, isto far^ com que 
o interpretador de BASIC "pense" que 
as posipoes de memoria acima de tal 
valor (inclusive ale mesmo) nao exis- 
tem no seu equipamento. 

Para saber os comandos que devem 
ser usados para que a informapao saia 
no video, procure no manual do TK, 
na segao onde sSo descrrtas as variSveis 

do sistema. LS, voce encontrar^ estas 
informagoes. Em especial, estude as 
vari^veis de nome DF-CC, LAST-K e S- 
POSN. Outra coisa: lembre-se de que 



na memoria e mantida uma imagem da 
tela, enderepada pela vari^vel D-FILE. 
Veja o capi'tulo que trata da organiza- 
pao da memoria. 

Todas as instrupoes do 8080 sao 
compati'veis com o Z80, mas a recfpro- 
ca nao e verdadeira. O Z80 tem uma 
serie de instrupoes nao execut^veis 
pelo Intel 8080. 

A funpao USR corresponde a um 
GOSUB do BASIC. A diferenpa reside 
no fato de que a funpao USR endere- 
pa uma posipS'o de memoria real 
(onde normalmente comeparia uma 
sub-rotina em linguagem de maquina) 
ao inves de enderepar uma linha de 
instrupao de BASIC, como faz a instru- 
pao GOSUB. Adicionalmente, a funpao 
USR nos remete o conteudo final do 
par de registradores BC do Z80. 

Para retornar da retina em Assem- 
bler para o programa principal, utilize 
a instrupao RET do Z80, pors a funpSo 
USR executa um CALL, guardando o 
enderepo de retorno no STACK- 
POINTER. 

Pergunta — Gostaria de saber algumas 
informagoes sobre o CP-200: este equi- 
pamento usa palavras de 8 bits ou j^ 
apresenta palavras de 16 bits? Elepode 
ser adaptado a qualquer aparelho de 
TV e gravador domesticos? Se pode, 
como deve ser feito? ^ necess^rio, em 
lugar onde hS quedas repentinas de 
energia el^trica, usar um transforma- 
dor? (Gilberto A. Viana, SC) 
MICRO SISTEMAS - CP 200 usa 
patavra de oito bits. Utiliza qualquer 
TV e gravador (port^til) e a ligapao do 
micro e feita diretamente na antena da 
TV. E aconseihivel usar um estabiliza- 
dor de tensao, mesmo onde nSo h^ 
quedas repentinas de energia, pols a 
voltagem sofre, a todo momento, uma 
oscilapao impercepti'vel pelo usu^rJo 
do microcomputador. 

Pergunta - Observei que o TK 82-C 
nao tem os comandos READ, DATAe 
RESTORE e tambem nSo h4 jeito de 
separar os comandos na mesma linha 
de programa. Como posso substituir 
esses comandos e obter os resultados 
desses comandos que nSo existem no 
TK82-C? (Gilberto Gamer, SP) 



MICRO SISTEMAS - Pode-se simular 
um READ feito em uma instrupao 
DATA no TK82-C atraves da utiliza- 
pSo de uma matriz alfanumerica, na 
qual coloca-se os dados necessaries ao 
se rodar o programa pela primeira vez. 
Porem, uma vez que estes tenham sido 
introduzidos na matriz, s6 se deve inl- 
ciar a execupao do mesmo nas vezes 
subsequentes atraves do comando 
GOTO nnn(nnn e o numero da primei- 
ra linha do programa) ao inves de RUN. 
Se assim nao for feito, o conteudo da 
matriz se perder^. O RESTORE pode 
ser simulado atraves de um I'ndice 
para acesso A matriz de dados. 

Infelizmente e uma caracterfstica 
do BASIC do TK82-C nao permitir a 
digitapao de mais de um comando de 
BASIC por linha. 

Pergunta - fx/ste no Brasil software 
aplicativo ou o sistema operacional 
CP/Mpara o CP-500? Existem tambem 
compiladores FORTRAN II E COBOL 
ANSI/74 gerenciados pelo sistema 
CP/M? Quais as implicaqoes de hard- 
ware que o CP-500 deve ter para isto? 
(Inaudio Alves, SP) 

MICRO SISTEMAS - Qualquer apli- 
cativo compatfvel com o TRS-80 mo* 
delo III e compati'vel com o CP-500. 
CP-500 nao utiliza o CP/M; o seu siste- 
ma operacional e equivalente ao TRS 
DOS. Existem compiladores FOR- 
TRAN II e COBOL ANSI/74 s6 para 
equipamentos que rodem sob o CP/M, 
como, por exempio, o S- 700 da Prolo- 
gica. 

Pergunta — Por que para se implemen- 
tar o CP/M em um micro 6 preciso pe- 
lo menos uma unidade de disquete? 
(Pedro Paulo L. Cunha FP, DF). 

MICRO SISTEMAS - O CP/M tem 
como caracterfstica principal ocupar o 
menos possfvei de membria RAM (dei- 
xando o miximo de RAM disponfvel 
ao usudrio). Assim, s6 ficam na mem6- 
ria RAM as rotinas bisicas do CP/M 
(carregadas no infcio da operapao do 
computador), sendo que qualquer uti- 
lit^rio reside na memdria apenas du- 
rante o seu use. 

Por isso, o CP/M precisa restdir em 
um perif^rico, no caso, disquete. 

Pergunta — ^ possfvel adapter os dri- 
vers do CP-500 no TRS-80 modelo III? 
(Marcos Fernando Ferraz, RJ) 

MICRO SISTEMAS - drivers do 
CP-500 podem funcionar no TRS-80 
modelo Ml, desde que o TRS-80 tenha 
a sua interface para disquete original 
(da Radio Shack). 



NOVIDADE 

NOVA IMPRESSORA^ARA SEU COMPUTADOR 

TRANSFORME SUA IBM DE ESFERAS NUMA IMPRESSORA PARA COMPUTADOR 

O novo sistema de interface transforma qualquer mSquina 
de escrever IBM de esferas numa impressora de alta qualidade para 

seu microcomputador. 




controlador baseado em microcomputador 

memoria central de 2 K bytes 

interfaces: paralela serie {RS-232C) 

taxas de transmissao: 110 baud 
300 baud 
600 baud 



- velocidade de Impressao: 13 cps 

- acionamento eletromecanico atraves de solenoides 

- opera em 110V ou 220V 

- assistencia tecnica permanente 

- baixo custo 

- facil instalapao 

- compativei com qualquer microcomputador 

- nao altera nem utiliza sua IBM como maquina de escrever 



. Revenida Software ^^ f5!^'"5 ^ - Revendedor: Equipamento 

Calcstar - Datastar - Wordstar - Microcomputadores 

- Desenvolvimento de Softv^/are especifico - Suprimento para Micros 

- Cursos 



fTlisrciiara 



Sistemas Ltda 



informagoes 

Rua Francisco Dias Velho, 154 

Brooklin - Sao Paulo 

CEP 04581 ■ Pone: (01 1) 241-3323 



Veja como sao feitas as grava0es em cassete nos micros compativeis com 
TRS-80 e quais os principals problemas que aparecem. 



Formato de gravagao 
em cassete 



Daniel Augusto Martins 



Osinal gerado na gravatpao de fitas cassete, para 
a maioria dos microcomputadores do mercado 
Item a forma de urn trem de pulsosa intervalos 

regulares para sincronizapSo durante a leitura em me- 
moria. Exatamente a meio caminho entre dois pulsos 
de sincronismo ^ entao gerado (ou nao) urn pulse de 
informapao representando urn bit. A figura 1 ilustra 
um sinal no tempo ti'picoencontradoem uma fita re- 
produzindo a informa(pao bindria 101 1001 . 

£ interessante observar que este sinal nao introduz 
nenhum componente de corrente conti'nua na grava- 
(pao. programa em memoria que ir^ ler uma fita, de- 
tectando a presenpa do pulse de sincronismo e co- 
nhecendo o intervale entre pulsos, pedera detectar a 
presenpa ou ausencia de um bit de infermapao e ir ar- 
mazenando em memoria, bit a bit e byte a byte, a in- 
formapae contida na fita. tempo que deve ser espe- 
rado entre es^ pulsos de sincronismo e inversamente 
proporcional a velocidade de transmissao adetada. As- 
sim, quante maior a velocidade de transmissao, me- 
ner deve ser o intervalo de tempo entre pulses. 

CAUSAS DE ERROS DE LEITURA 

A limitaipae em frequencia dos pequenos gravade- 
res e, principalmente, a qualidade da fita usada sae 
causas de erros de leitura quando a velocidade adeta- 
da 6 alta. Outra causa de erros ^ ilustrada na figura 2, 
onde se compara aproximadamente um pulso, tal ce- 
mo 6 gerado pelo micro na hera da grava(pao e tal co- 
mo ^ recebido de velta na hora da leitura. 

Como a detecpae do bit de informapao ^ realizada 
pela sua presenpa ou ausencia entre dois bits de sin- 
cronismo, ajuste de volume de gravador, bem como 



puUoi de ■iT <r^ ^ V V ^;^ ^^ \ 

lincronliBO ^ ^ ^ ^ ^ ^ N \ 



pulsoi da 



/////// 



Figura 1 — Forma de onda. 



u 




sinal gerado pelo micro 



sinal recebido de votta 



Figura 2 — Distor^o no sinal. 

a presenpa de rui'do na fita, tamb^m podem ser causas 
deerresde leitura. 

Para aumentar a seguranga na repredupao de pro- 
gramas, adotam-se meios software de gravapao. Assim 
surgem os formates de gravapao que, diminuindo no 
total tempo gasto na leitura de um programa, au- 
mentam a possibilidade de que a leitura realizada es- 
teja correta. Em um programa BASIC e, principal- 
mente, em um programa em linguagem de m^quina, 
isto ^. no formate SYSTEM, um bit simplesmente li- 
do errado pede ser desastrese ne funcionamente do 
programa. 

SINAL DE SINCRONISMO 

Um pento importante na leitura 6 a busca pelo sin- 
cronismo inicial. Uma fita pode center rui'dos antes 
do programa, ou pode center mesme segmentes de 
outros pregramas que tenham side esquecidos grava- 
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dos. O computador dever^ ter meios de poder reco- 
nhecer o ini'cio de um programa, se o tipe de progra- 
ma e aquele solicitado e ainda se trata-se do programa 
cujo nome ou identlficapao foi fornecido. 

Para resolver o primeire preblema, isto e, come de- 
tectar ini'cio de um programa, adotou-se o seguinte 
criterio; sempre que e executade o comando BASIC 
CSAVE "X", ende X.e o nome do programa a ser gra- 
vade em fita, o computador gera 255 bytes a zero na 
sai'da de cassete (na forma de onda mestrada na figu- 
ral ), antes de comepar a enviar os bytes do programa. 
Iste significa que o ini'cio da gravapao contera 255 x 
8 pulses de sincronismo e nenhum pulse de inferma- 
pao. 

Da mesma forma, as fitas em formato SYSTEM, 
compradas no mercade ou preduzidas por um monta- 
dor Assembler, contem este trem de pulsos denomina- 
de triller. £ possi'vel notar a presenpa deste triller 
ouvindo o ini'cio de uma fita gravada e observande 
que gravador reproduz um unico torn lego no in I'cie 
do programa. Imediatamente ap6s o triller, 6 gravade 
um byte de sincronismo, A5, em hexadecimal (1010 
0101). Deste mode, na hora da leitura de um progra- 
ma, o micro espera ler zeros e, assim que os encontra, 
fica esperando pela primeira ecerrencia de um bit a 1, 
bit mais significative de A5. Lido e byte A5, o sin- 
cronismo inicial 6 entao conseguido. 

INFORMAQOESCOMPLEMENTARES 

segunde passe 6 verificar se e programa encen- 
trado 6 de tipe esperade. Para os programas em BA- 
SIC, isto ^ caracterizado pela presenpa de tres bytes 
censecutivos D3, em hexadecimal, ap6s o byte de sin- 
cronismo A5. que caracteriza os programas em lin- 
guagem de maquina, isto €. programas em formato 
SYSTEM, e um byte apenas de valor 55 hexa, ap6s o 
byte de sincronismo. 

ultimo detaihe a ser resolvido, antes de comepar 
a leitura do programa prepriamente dito, 6 a verifi- 
capao da sua identlficapao ou e neme do programa. 
Os pregramas em BASIC sao identificados per uma le- 
tra ou cardter. Porexemplo, para gravar um programa 
BASIC em cassete, usamos e comando CSAVE "A", 
onde A 6 o nome do programa. Quando da leitura 
deste programa pelo comando CL0AD"a'' o micro 
precurard dentre os programas gravados na fita aque- 
le que ^ identificado pele nome A. 

Deste mode, numa fita BASIC, o cddigo ASCII 
(American Standard Cede for Information Inter- 
change) da letra A, isto e, 41 em hexadecimal, sera o 
byte que se segue aes tres bytes D3 descritos ante- 
riormente'. Per sua vez, um programa em linguagem 
de 'maquina d identificado por um nome de ate seis 
caracteres alfanum^ricos. Assim, ae byte 55 hexade- 
cimal, que caracteriza uma fita no formato SYSTEM, 
seguem-se seis bytes codificados em ASCII de nome 
do programa. Se o neme de programa contiver um 
numero de caracteres inferior a seis, os restantes sao 
preenchidos pele cddige de espapo, (20, em hexade- 
cimal). 

FORMATO BASIC 

Resta agora e programa prepriamente dito. A figu- 
ra 3 ilustra o que foi descrito at6 aqui com respeito 

aos programas BASIC. corpo do programa e cem- 

» 
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MICRO FAN 

vairefrescar 
as memdrias 
de seu micro 




voce mesmo instala em 
menos de 1 
minuto 




Encaixa direto no CPU - sem furos ou parafusos, 

Aumenta a vida util da fonte, do microprocessador 

e das memOrias 

Evita as paradas per superaquecimento 

Duas tomadas adicionais para ligapao 

de outros perlf6rjcos 

Equipado com interrupter 
e lampada piloto 

Cor bege suave, cemblnando 
com seu equlpamento 

Garantido por 60 dias 




Desejo receber ::: unidade(s) do Micro Fan por l reem- 
bolso postal r reembolso varig, na voltagem de :_ 110V 
:: 220V, pelo prepe de CrS 69.900,00', cada unidade. 



- Indicar marca e modelo 



Nome: 

Empresa: 

Enderepo: 

Cidade; CEP 

Fones: 



Est 



Recorte ou copie e envie para: 

Micro Fan - C. Postal 819 • CEP 13100 - Campinas - SP 

* Prepe vaiido at6 50-7-85, com frete inciuse. 



FORMATO DE GRAVAQAO EM CASSETE 











byte de sincronisno 
ittdlcA^ao de fomaCD BASIC 

LndicB^BO de fim do programa 




Tri 1 ler 
de 
2S5 


► 


AS 


D3 




— 


D3 


D3 


corpo do 

progratna 
BASIC 




00 


00 









Figura 3 - Formato de uma fita BASIC. 

posto do texto BASIC codificado ainda em ASCII, 
salvo para as palavras reservadas da linguagem — como 
PRINT, GOTO, RETURN etc. - que sao codificadas 
em apenas urn byte, denominado "token". Estes by- 
tes sao sempre superiores a 80 hexadecimal. Observa- 
se ainda na figura 3 que a indicagao de fim do progra- 
ma e fornecida pela presenga de dois bytes consecu- 
tivos a zero (cardter NULL). 

FORMATO SYSTEM 

A figura 4 ilustra o formato de uma fita SYSTEM. 
No caso, para maior seguran(pa de leitura, o corpo do 



ftlSDi 





ras 


Tamanho 
Larg. xAlt. 


Quant, 
por caixa 


Cor 
de impressdo 


Tarjas 


1 


240minxn" 


lOOOfolhas 


sem impressao 


- 


2 


240mm X 11" 


400 jogos 


sem impressao 


- 


1 


375mm X 11" 


IDOOfolhas 


sem impressao 


- 


2 


375mm xU" 


400 jogos 


sem impressao 


~ 


1 


375mmxll" 


lOOOfolhas 


Azul 


1/6" 


2 


375mm X 11" 


400 jogos 


Azul 


1/6" 



EMBALAGEM MOLTIPLO USO 

Os fonnularios Rediform vem acondicionados em embaU^em piojetadas 
para proporcionar perfeila prote^o ao seu conteudo e facibtai o tianspor- 
te, poL":. sao do lipo malela. Outra vantagem deltas embalagens C a possibi- 
bdade do seu leaproveitamemo como caixas arquivo, acondicionando o 
proprio fonnulanoja utUizado ou outios documentos. 

S*&ul2:W. Monte Alegre, 1.378 
CEP 05014 - Telefones: 62-9978 
263-0263 -263-1 710-263-3156 
Telex: (Oil) 39863 VCTR-BR 
R.de Janeiro :>lv. Rio Branco.l 23 - 139 ■ SI 1310 - Tel: 224-1244 
Santo Andre :/tv. Portugal, 397- IC^ ■ S/ 1004 - Tel: 444-3084 




25S 
ze ros 



AS 



55 



JLJL 



-1X_ 



JUL 



3C 



End. - 



cof pa 

do 
bloco 



-fr bvte de s I nc ron I smo 

-^ Indicdfao de Forirato SYSTEM 



Codigo ASCII do none do prograraa 



S<L. 



_!£_ 



-fr Indlc^gao de InTcIo de bloco 

-* comprimenio do bloco em byte* 

-+ byte rnenos signlf. do end. de carreg. 

~^ byce nail Hlgnif. do cod. de carreg. 



segmento do prdgraraB 



:heck-Bua 



-^ Indlcafio de InTcIo do prox. bloco 



out ros 

Ij I OCOi 



Jl. 



End. - 



_Lni_ 



->■ Indlcaijao de fim do programa 

-^ endere;D ijienoi s 1 gn 1 F . de lan^anento 

-^ endcrefo maia signif. de lan^ameDCo 



Figura 4 - Formato de uma fita SYSTE/^. 



programa ^ dividido em blocos de no m^ximo 256 
bytes, mas normalmente composto de 128 bytes. A 
indica{pao de ini'cio de bloco 6 fornecida por urn byte 
3C hexadecimal byte que se segue a indicagao de 
ini'cio de bloco fornece ao micro o numero de bytes 
que compoem este bloco, dai' o comprimento do blo- 
co ser limitado a 256 bytes. Este byte estando a zero 
indica um comprimento de 256 bytes. 

Os dois bytes seguintes indicam ao micro a partir 
de que enderego em memoria este bloco deve ser car- 
regado. byte menos significativo deste enderego, 
que 6 sempre de 1 6 bits, vem antes do byte mais sig- 
nificativo. Apos estes dois bytes, vem o bloco a ser 
carregado, Isto ^, um segmento do programa, segui- 
do de um c6digo de redundancia longitudinal, deno- 
minado "check-sum". Este c6digo ^ obtido pela so- 
ma (modulo 256) de todos os bytes que compoem o 
bloco, inclusive os dois bytes que indicam oenderepo 
de carregamento do bloco. 

Os blocos entao se sucedem at^ que, ao inv6s da in- 
dica(?ao de ini'cio de bloco (codigo 3C) vem a indica- 
gao de fim de bloco ou fim de programa, c6digo 78 
hexadecimal. Ao byte de fim de programa, seguem 
dois bytes indicando qual o ponto de langamento do 
programa, isto 6. qual o enderego na mem6ria que 
contera a primeira instrugao do programa, em lingua- 
gem de m^quina, que deve ser executada. ■ 



Daniel Augusta Martins ^ Engenheiro Eletrdnico com Mestrado am Sis- 
temas de Controle. Atualmente trabalha na Eletronorte no projeto do 
SJstema da Controie Supervisor da Usina HidreMtrica de Tucuruf. 



A MAIOR VERSATILIDADE 
PEIO MENOR PRECO. 



O JP-01 6um 
computadorpes- 
soal para uso em 
pequenas e 
medias em- 
presas que, 
por sua 
compatibili- 
dade com 
OS sistemas 
e linguagens 
mais usados no 
Brasil, apresenta 
uma versatilidade 
impar. 

Na sua configura- 
cao maxima permi- 
fe ao usu^rio todas 
as combinagOes pos- 
siveis para a instala- 
9§o de perif6ricos a 
sua escoiha, uma vez 




;beq^ 



ot 



fr^iQ^ 



iSS^ 



que incorpora em 
seu circuito as op- 
gCes de RS-232 
(comunicagao se- 
rial)', controladores 
de disco de 5" ou 8", 
saida para tres mo- 
nitores simulta- 
neos, alta reso- 
lugao de gr^- 
ficos a cores 
e P&B, me- 
m6ria se- 
parada 
para gra- 
ficos, 
saida 
para 
impres- 
sora 
paralela 
eRGB. 



10%dedesconto 

Leasing ou financiamento em ate 24 meses 



JP-JETI 16K(controlador) 1780RTN 

JP-i3ri48KC/PARALELA&FLOPPY 2780RTN 

RS-232 230RTN 

RGBROM 250RTN 

MONITORP&B 220RTN 

IMPRESSORA132COL.FT/GT 300 ORTN 



IMPRESSORA"DAISYWELL"' 320ORTN 

DOUBLER C/"SOFTWARE" SBQRTN 

UNIDADEDE5"S/D 120ORTN 

UNIDADEDE5"D/D 150ORTN 

UNIDADEDE8"S/D 180ORTN 

UNIDADEDE8'D/D 240CRTN 

DISCO RiGIDO (Winchester) 530ORTN 
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AvPresidente Vargas, 418. 16° andar Rio de Janeiro -RJ 
Tel.: 253-0827 Telex 34213 PEDM-BR 




• O Hobby Clube do Brasjl co- 
munica que jd est^o abertas as 
inscripSes para o seu quadro de 
associados e convida a todos os 
entusjastas da informdtica e ele- 
trdnjca em geral a se assocrarem. 
lnforma?8es per carta para Hob- 
by Clube do Brasil. Rua Celina 
Machado, 89, Conj . 2. CE P 02422, 
SP. 

• Oesejo entrar em contato com 
usudrios do TK82-C ou NE- 
Z8000 com 16 Kb de mem6ria, 
pars troca de id^ias e software. 
F^bio S. Carvalho, Rua Heber de 
Boscoli. 144/101. Vila Izabel, 
CEP 20551, RJ. 

• Troco programas de jogos. Te- 
nho : Duel-N-Droide. Attack Force, 
Missile Attack e outros. Tamb^m 
gostana de entrar em contato com 
possuidores do DGT-100 e do jo- 
go Death, Tratar com Renato, 
Rua Mosela, 436, CEP 25600, 
Petr6potis, RJ. 

• Possuo um TK82-C e gostana 
de contactar outros usujnos deste 
micro para troca de id^ias e pro- 
gramas. Carlos Eduardo Ribeiro, 
Rua J. Carlos, 5/403. CEP 22461, 
RJ. 



• Gostaria de entrar em contato 
com pessoas que possuam TRS-80 
Color, com UCP 6809 (motorola), 
para troca de id^ias e informacSes. 
Ennque Ferri, Av. Imerlagos, 
4455-EA, CEP 04661, tel.: (Oil) 
247-4400, r. 335, SP. 

• Gostan'amos de entrar em con- 
tato com leitores de MICRO StS- 
TEMAS que possuam equipamen- 
to Oismac 0-8002 com srstema 
operacional TRSDOS. Nosso ob- 
jetivo 6 saber, a nfvel de conden- 
sa^So de arquivo, como eliminar 
espa^s em branco causados por 
delegcTo de registros. Entrar em 
contato com Elcio, Av. Divino 
Salvador, 294, CEP 04078. te' : 
(011)531-6094,Moema.SP. 

• Gostaria de entrar em contato 
com clubes de T RS-80 Co lor 
Computer e Atari 800. Altair Jo- 
s6 Camera, Cx. Postal 45409. 
CEP 04009, Vila Mariana, SP. 

• Possuo um DGT-100 com 16 
Kb RAM e gostaria de me cor- 
responder com outros usudrios 
oara troca de programas e in- 
formapOes, Renato Nogueira Men- 
des, Rua Mosela, 436, CEP 25600, 
tel.: (0242) 42-2255, Petrbpolis, 
RJ. 



INTERSOFT 



SOFTWARE 

• Programas especificos para todas as Sreas. 

• Aplicativos: Foiha de Pagamento - Contabilidade - 
Estoque - Controle Bancarjo - Contas a Pagar e 
Receber - Faturamento Integrado - Mala Direta - 
Cadastro de Cliente - Cadastro de Imbveis - Outros 

• Editor Assembler - Compiladores Basic e Cobol - 
Jogos 

CURSOS 

• SJstemas Operacionais: NEW DOS - TRS DOS - DOS 
eCP/M 

• Integrados a KBASIC - MBASIC - BASIC 
respectivamente 

• VISiCALC 

SUPRIMENTOS 

• Disketes [5 1/"e 8'] - Formul^rios 

• Fitas Impressoras - Fitas Cassete Digitais 

comercializa(;ao de micros 

[NTERSOFT 

SiSTEMAS E COMERCIO EM 

COMPUTACAO LTDA. 



Avenitda BrigacJeiro Faria Lima, 1462 - conj. 2A 
Tel.: 211-0371 / 21 2-8971 - Sao Paulo - SP. 




VENDO 



compro 



SOFTWARE 

• Vendo programas para TK82- 
C, TK-85 e CP-200, tais como 
compilador Assembler, disassem- 
bly, rotina SAVE/LOAD (apenas 
dados) etc. Tratar com Claudio, 
tel.: (Oil) 235-3390 (hordno co- 
mercial), e (Oil) 61-6884 (s^ba* 
dos e domingos). 

• VIC 20, Vendo conjunto de 
programas (micro Assembler 6502, 
Editor. Loader) para uso com cas- 
sete e 5 Kb de RAM. Tratar com 
Marco Antonio pelo tet.: (Oil) 
864-1325 (a noite),Sao Paulo. 

EMPREGOS 

• Empress atuante na ^rea de 
infomidtica est^ admitindo pro- 
gramadores BASIC/COBOL para 
dar aulas de programaipdo. Tratar 
com Sr. Gerson pelo telefone: 
(Oil) 32-9834, SSo Paulo. 

• Ofereco-me para trabalhar no 
setor de informdtica. Sou forma- 
do em Programa de Sistemas com 
enfase nas linguagens COBOL e 
BASIC do Sistema 700 e CP-500 
da Prol6gica,NE-Z80O0eTK82-C, 
com experiencia na opera^o e di- 
gitac^o destes computadores. Pau- 
lo Antonio Lima da Motta, Rua 
Yolanda Suppi Bosqueiro, 297, Be- 
htaSBC, SP, tel.: (01 1)452-3743. 

• Programador com tres anosde 
experiencia oferece-se para servigo 
de free-lancer em equipamentos 
Cobra, nas linguagens LTD e CO- 
BOL. Contatos com Rafael Som- 
merfeld, Rua Moronha Torrezifo, 
407/404, bl. 10. Cubango, CEP 
24240. NiterbJ.RJ. 

EQUIPAMENTOS 

• Vendo monitor de vfdeo de 
fbsforo verde com sa/da direta pa- 
ra adapta^o a qualquer micro. 
Tel.: (0111 64-6209 ou 263-8491. 
Prego;Cr$ 50 mil. 

• Vendo TRS-80 com interface 
para cassete e manual de software. 
Novo. Pretpo Cr$ 150 mil. Tratar 
com Nubia pelo telefone: (021) 
275-5385. RJ. 

• Vendo Chess Challenger 10, 
usado, por Cr$ 55 mil [k vista). 
Tratar com Eduardo, telefone: 
(021 ) 396-7274, Rio de Janeiro. 

• Vendo micro Sharp SE/122e 
impressora, na embalagem, por 
Cr$ 150 mil. Tratar com Charlo- 
te, tel: (021) 294-0243. 

• Vendo HP-41CV, nova, na cal- 
xa, por Cr$ 220 mil, Tratar com 
Alex pelo tel.: (Oil) 275-5073, 
Sao Paulo. 

• Pechincha: vendo um NE- 
Z8000 e um TK82-C, ambos com 
expansSo de memdria de 16 Kbe 
fonte de altmenta^o. Cr$ 50 mil 
cada. Tratar com Gerson, Av. Bri- 
gadeiro Luis Antonio, 290, 69 
and..conj. 64, tel.: (01 1)32-9834, 
S3o Paulo. 



• Vendo TRS-80 Modelo III 
com 48 Kb, duas unidades de dis 
cos originais, com o seguinte soft 
ware: VisiCalc, SupervisiCalc 
Scripsit, COBOL, FORTRAN 
Sort-Merge, Compilador BASIC 
PROCALC, PROFILE PLUS 
NEWDOS. DOS PLUS, jogos di 
versos, Index para disquete, mala 
direta, contabilidade, controle de 
estoque, c^lculos financeiros, cur- 
so de BASIC e or^amento de 
obras. Tratar com Claudio, tel.: 
(081 ) 222-6673 e (081 ) 268-0444. 
Praca do Entroncamento, 50/ 
1002, Gragas, Recife-PE, CEP 
50.000. 

• Vendo VIC-20 COLOR COM- 
PUTER com gravador pr6prio. 
joystick, dois manuals e todas as 
expansdes de memdria (total 32 
Kb), por US$ 700 ou Cr$ 500 
mil, Motivo viagem. Pedro Henri- 
que, tel.: (021) 259-6509 (a nof- 
tel, Rio de Janeiro. 

• Vendo CP-200 por Cr$ 170 
mil e uma Calculadora Sharp 1211 
com interface para cassete e com 
impressora por Cr$ 160 mil (am- 
bos com garantia). J, Maldonado, 
tel.: (Oil I 452-6617 ou 452-6835, 
S3o Paulo, SP. 

• Compro TK82-C com pouco 
uso, de prefer§ncia com expansSo 
de 16Kb e joystick. Aceito tam- 
b^m com demais acessbrios (vfdeo 
e cassete). Tratar com Gabriel Va- 
le Aguilar. Rua AnSpolis, 179, 
Santa Efiggnia, Belo Horizonte, 
MG, CEP 3(XXK), ou pelo telefone 
(031) 212-2055 ramal 140 (hord- 
riocomercial). 

• Vendo TI-58, programas, ma- 
nuals, carregador, folhas para co- 
dificagao por Cr$ 35 mil ou tro- 
co, dando como diferenpa uma 
impressora para o TK82-C ou ex- 
pansSo de 64 Kb. Tratar com Ma- 
noel S. Rodrigues, Rua BarSo 
230/401, Jacarepagu^, Rio de Ja- 
neiro, R J, CEP 21321 . 



DIVERSOS 

• Compro, Via Postal, exempla- 
res atrasados da MICRO SISTE- 
MAS, numeros 6 e 7, para com- 
pleter minha cole^^o. Luiz C. M. 
Ouintella, Cx. Postal 02, CEP 
35180, tel.: (031) 848-3934, Ace- 
sita, MG. - D 

• Compro o numero 6 de MI- 
CRO SISTEMAS. Diga o prepo 
pelo telefone, C^lio, tel.: (021) 
240-5189, RJ. - D 

• Gostaria de comprar os nume- 
ros 6, 7 e 8 de Micro Sistemas. 
Tratar com Alexandre Nadalutti 
pelo tel.; (Oil) 458-0017, Sfo 
Bernardo do Campo, SP. 

• Ofere^o consultoria, an^lise e 
programaipSo de qualquer sistema 
LABO 8221. Ataro dos Santos 
Lobato, Av. Presidente Vargas, 
633/720, CEP 20071, Tel.: (021) 
580-6815, Rio de Janeiro, RJ. 
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milesimo videotexto. 

Telcsp instala seu aparelho de videotexto n^ 1 ,000. Cada terminal de videotexto colocado e um 30I de nossa 
tecnolosia no placar do progresso. A tatica de juntar o telefone com a televisao deu como resultado o 
videotexto, filho superdotado de dois poderosos meios de comunicagao, O videotexto passa pra voce - 
sempre de primeira - as infomiagoes e services que levarao a meta desejada. O sistema funciona como um 
banco de dados, atraves da rede telefonica. Voce escoihe o genero de Informa- 
(;ao que deseja receber na tela do seu televisor numa operagao tao simples 
quanto um telefonema. Videotexto nao brinca em servigo. A contagem de 

1 .000 aparelhos prova que ele veio pra ficar. Uma vitoria do pioneirismo da faj^—xJ tel£cpmunic«;oes 
Telesp nojogago do videotexto. 




oesAOP/yjLOSA 

EMPRESA DO SISTEMA TitiBRAS 



Com urn in vestimento relativamente pequeno, 4 possi'vel para o arquiteto 
simp/if tear e agilizar o seu trabalho no TK82-C. 



Composicao de precos unitarios — If parte 



Composicao de precos 
unitarios 



Jos4 Eduardo Maluf de Carvalho 



N 



o ramo da construgao civil, uma das tarefas 
mais desagradaveis e cansativas e a elaborapao 
de orpamentos. A constante alta dos pregos, 
ocasionada pelas dificuldades economicas atuais,vem 
complicar ainda mais esse problema. Nao sao rarosos 
casos em que ouvimos de clientes a queixa de que o 
orgamento "furou" e que o dlnheiro esta "curto". 
Procuramos, entao, baratear o custo da obra pelo em- 
prego de materiais mais em conta, o que, consequen- 
temente, provoca aiteragoes no projeto original. 

Para facilitar a elaboratpao dos orgamentos e traze- 
los mais proximo possi'vel da realidade, desenvolve- 
mos este programa para o microcomputador TK82-C, 
da Microdigital, com expansao de 16 Kb. As 271 
composigoes de precos unitarios que ele oferece per- 
mitem fazer um orgamento bem detalhado. 

PLANILHAPADRAO 

Os itens do programa seguem a ordem padrao de 
uma planiiha quantitativa, a saber: 1) Demolicao; 2) 
Retirada de (aproveitamento); 3) Servigos prelimina- 
res; 4) Fundagoes; 5) Concreto (CA — concrete arma- 
doe CS —concreto simples); 6) Alvenarias;7) Imper- 
meabilizagoes; 8) Revestimentos; 9) Forres; 10} Pi- 
sos; 1 1} Rodapes, peitoris e soleiras; 12) Coberturas; 
13) Esquadrias de madeira e met^licas; 14) Vidros; 
15) Instalagoes hidraulicas e de incendio; 16) Instala- 
goeseletricas; 17) Pinturas;18) Limpeza. 

Em virtude das limitagoes de memoria do sistema, 
dividimos o programa em duas partes. A primeira de- 
las abrange ate o item 12 (Coberturas), num total de 
1 36 composigSes de pregos. A segunda parte, que per- 
mite fazer 135composigoes, inclui os itens restantes. 

Os pregos apresentados no programa — fornecidos 
por orgaos oficiais do ramo da construgao de Sao Pau- 
lo — sao baseados no mes de junho de 1982. A atua- 
lizagao, contudo, e automatica: ap6s carregar o pro- 
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grama, digita-se o I'ndice escolhido para o reajuste dos 
pregos. Feito isso, o micro listara todos os itens com 
os pregos atualizados. 

programa possui uma grande flexibilidade, pois 
permite ate a elaboragao de orcamentos mensais, sem- 
pre de acordo com o i'ndice escolhido pelo usuario 
para o reajuste dos 'pregos, Caso se queira saber os 
pregos base, basta digitar como i'ndice de reajuste o 
valor 1.873,37 (ORTN de junho/82). Utilizando-se 
uma TK Printer (impressora), e mediante um simples 
comando (COPY), tem-se no papel a listagem dos 
itens, c que servira de padrao para a confecgao das 
planilhas quantitativas. 

Terminada a listagem, deve-se digitar quantos itens 
serao empregados na composigao do orgamento. Em 
seguida, digita-se o numero do item e a quantidade 
que sera usada. Finalmente, a somatoria dos itens e 
apresentada na tela. 

Como o programa ocupa inteiramente os 1 6 Kb de 
memoria, ele leva 6 min. e 30 seg. para ser carregado 
e, para processar uma tela da listagem (22 itens), sao 
precisos 30 segundos em FAST. 

presente programa faz parte de um conjunto de 
programas referentes a obras, por nos desenvolvidos, e 
que inclui, al^m deste, osseguintes: 1) Leis de Zonea- 
mento do Munici'pio de Sao Paulo (16 Kb); 2) Calcu- 
lo de Materiais de Obras (16 Kb); 3) Pregos de Mao- 
de-Obra (2 partes}; 4) Pregos de Materiais de Constru- 
gao (2 partes); 5} Contabilidade de Obra (16 Kb). 

Em virtude das limitagoes de espago, publicamosa 
seguir somente a primeira parte do programa. A se- 
gunda parte sera publicada na proxima edig§o. 



Arquiteto formado em 1976, Jos^ Eduardo Maluf de Carvalho trabaiha 
como autdnomo em seu escritdrio, realizando projetos residenctais e co- 
merciais. Atua tamb4m em plane/amgnto urbano na SEMPLA — Secre- 
taria Municipal de Planejamento de Sao Paulo. 
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10 REM "PRECOS UNITARIOS" 

15 CLEAR 

20 SLOW 

26 PRINT AT 9,2; "PRECOS UNITARIOS - 1 PA 

RTE" 
30 PRINT AT 11,2; "PR0GR7VMA ELABORADO PEL 

ARQUITETO JOSE EDUARDO MALUF DE CAR 

VALHO" 
40 PAUSE 180 
50 POKE 16437,255 
60 CLS 

62 PRINT AT 11,2;"AN0TE QUANTOS E QUAIS 
SAO OS ITENS QUE VOCE VAI USAR PARA A 
SOMATORIA FINAL" 

63 PAUSE 180 

64 POKE 16437,255 
66 CLS 

68 PRINT AT 9,2; "PRECOS BASE DO MES DE J 

UNHO DE 1982 - ORTN = 1873.37" 
70 LET J = 1873.37 

72 PRINT AT 11,2;"DIGITE O INDICE DE REA 
JUSTE {ORTN OU SINDICATOS DE CONSTRUC 
AO) " 

73 PRINT AT 14,2; "NOTA: SE FOR INDICE PE 
RCENTUAL, ENTRE COM NUMERO MULTIPLICA 
DO POR 1873.37" 

74 PRINT AT 17 , 2; "EXEMPLO: INDICE DE 50.8 
8% - DIGITE 1.5088x1873.37" 

75 PRINT AT 19,2; "PARA IMPRIMIR APERTE " 
Z" E NEWLINE - tARA CONTINUAR A EXECU 
CAO APERTE "C" E NEWLINE" 

76 INPUT H 

77 CLS 

78 LET K= H/J 
80 DIM A{136) 



90 DIM B$(136,26) 

95 FAST 

100 LET C=0 

110 FOR C=l TO 136 

120 LET B$(1}="1-DEM. FUND. M3=" 

122 LET A{1)=5460 

124 LET B$(2)="2-DEM ESTRUT ALVENM3=" 

126 LET A{2)=2092 

128 LET B$(3)="3-DEM ESTRUT CONCR=" 

130 LET A(3)=5460 

132 LET B$(4)="4-DEM REVEST ARGAMM2=" 

134 LET A{4)=110 

136 LET B$(5)="5-DEM REVEST AZUL OU CERA 

M" 
138 LET A(5)=195 

140 LET B$C6)="6-DEM PISO CONOR M3='' 
142 LET A(6)=3010 

144 LET B$(7)="7-DEM PISO CERAM=" 
146 LET A(7)=165 

148 LET B${8)="8-DEM PISO MADEIRA=" 
150 LET A(8) =110 

152 LET B$(9)="9-DEM TUBO FF ML=" 
154 LET A(9)=88 

156 LET B$(10) ="10-DEM TUBO PVC ML= " 
15 8 LET A (10) =6 8 

160 LET B$(11)="H-RETIR ALVEN M3 " 
162 LET A(ll)=2185 

164 LET B$(12)="12-RETIR MAD P/TELH M2=" 
166 LET A(12) = 608 

168 LET B$(13)="13-RETIR ESQ MADM2=" 
170 LET A(13)=715 

172 LET B$(14)="14-RETIR ESQ METAL=" 
174 LET A(14)=502 

176 LET B$(15)="15-RETIR INTER E TOM=" 
178 LET A(15)=43 



••■ ■■• ••• ••• ••• ••••••• •••••■■ 
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PARA TODO E QUALQUER TIRO DE MICROCOMPUTADORES 



Desenvolvemos programas especfficos, em frta ou 
diskete, para aplicaQoes diversas. 
Temos disponi'veis mais de 50 programas para 
DGT-100, D8000, CP5Q0, TRS80 e outros. 



,\M^ 



■^£S^^- 



w-5S.>;s-* 



o^<^ 



CO' 



.^o* 



pa' 



O 



^ d /i/tema/ * 



FINANCEIROS: Contabilidade, Controlede Estoque, 

Foiha de Pagamento, Credi^rjo, Faturamento, Contas a 

Pagar e Receber, etc. 

CIENTI'FICOS: Histogramas, Grdficos, Curvas, Integral e 

outros. 

DIVERSOS: Jogosdedivers§o,Vi'deo-CIubes, Ma!a Direta. 



n Desoorrtos especiais para revendedores. 

O ConsuKoria e assessoria completa na escoiha do equi- 
pamsnto ideal e mais adequado Ss necessidades de sua 
empresa. 

D Atendimentt) por reembolso postal para todo o Brasil. 

D Cursosde Basic :turmas limitadas - 10 pessoas. 
Durapao 2 semanas. Aulasdiirias (19 as21 h.) 



Av. RioBranco, 45 ■ gr. 1311 -TeL (021) 
263-1241 ■ CEP. 20.090 - Rio de Janeiro. 
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UVRARIA SISTEMA 

LOJA: RUA 7 DE ABRIL, 127 - 8° - (GALERIA DAS ARTES) 
TELS.. (01 1) 36-1047/34-2123 - SAO PAULO ■ SP- CEP: 01043 
CORRESPOND^NCIA: CAIXA POSTAL 9260 - CEP 01051 - SP. 



SEMPRE NOVIDADES 



1 - ANALISE DE DADOS - Bouroche . . 

2 ■ APPLICATION DEVELOPMENT WITHOUT PROGRAMMERS - J Martin 

3 BASIC PARA MICRO PESSOAIS - Pereira Filtio 

'i- 101 TiMEX 1000/SINCLAIRZX-81 - PROGRAMMING - TIPS & TRICKS . 

5 101 COLOR COMPUTER PROGRAMMING TIPS & TRICKS -Clark 

6 CRIANQATAMBEMFAZPROGRAMAS Silva 

7 - DATA BASE ARCHITECTURE- Flares . . 

8 FAST BASIC BEYOND TRS-80 BASIC ■ Gratzer 

9 -GETTING ACQUAINTED WITH YOUflZX-81 - more than BO programs 

10 - INTRDDUQAO AO VISICALC - Garbin 

1 1 ■ LINGUAGEM BASIC - Mirshawka 

12 - MICROCOMPUTER SYSTEMS ■ Flores 

13 • MICROCOMPUTER GRAPHICS AND PROGRAMMING TECHNIQUES - Kaizan 

14 - MICROPROCESSOR DEVELOPMENT AND DEVELOPMENT SYSTEMS 

Tseng . . . . 

15 MICROCOMPUTER ARCHITECTURE AND PROGRAMMING - Wakerly 
16 -30 PROGRAMS FOR THE SINCLAIR ZX-81 -1K 

17 - 99 TIPS & TRICKS FOR THE NEW POCKET COMPUTERS - Cole 

18 -40 COMPUTER GAMES FROM MICROCOMPUTING -. 

19-45 PROGRAMAS PRONTOS PARA ROOAR EM TK 82C NE Z8000 - Lima . . 

20 - SOFTWARE RELIABILITY - Piinciples & Praclices - Myers 

2J -THE2X-81 COMPANION - TIMEX/SINCLAIR lOOO COMPATIBLE - Maufidef 

22 - THE JOB FINDER Mainstream 

23 - THE PASCAL HANDBOOK - TiOergtlien 

2A - 37 TIMEX 1000 SINCLAIR ZX-81 PROGRAMS FOR HOME, SCHOOL. OFFICE 
25- VISICALC HOME AND OFFICE COMPANION -Casllewitz . . . 

26 - MiCfiOCOMPUTAOORES - Coniatos imeflialos - Vol. - Barboza tie Oliveira 



1.200, 
38.000. 

2.950. 

9.000. 

9 000. 

1.390. 
36.000. 
18.000. 
12.500. 

2,350. 

3 700, 
32.000. 
28 000, 

25.000. 
15.000, 
12 500. 

9.000, 

9.000. 

3 000, 
40 000. 
12.900, 
10 000. 

8 000. 
12.000. 
15.000. 

3 200. 



SOLICITE POR REEMBOLSO POSTAL (fora capital) 



O SUCESSO DO 

MICRO FESTIVAL - 83 

CONTINUA AGORA NO 

SHOW-ROOM DA 
SAGOO. 

O sucesso do Micro FesiJval-83 de Informalica 

continua agora, nas novas instalagoes 

do show-room da 

SACCO Microcomputadores. 

Os principals equipannenios e sucessos 
do Micro Feslival. podem ser agora, 
conn muito mais tempo, conhecidos, 
analisados, comparados e. naturalmente 
comprados - a vista ou ate em 
24 presiagoes. 



O principal sucesso da 

SACCO Microcomputadores no 

Micro Festival, foi o iangamento d(3' 

JR - microcomputador da SYSDATA"^ 

que possui excelentes caracterislicas 

tecnicas de projeto. fabricapao, 

inOmeras aplicaQfies e urn prego meihor ainda 

Temos para pronia enlrega. equipamenlos nas versOes de 1£ 




OU48K 



A SACCO - Microcomputadores e uma empresa. que se dedica a: 

.^SBQBQBS^ * Comercializacaode Microcomputadores 
■■■■■| equipamentos e acessorios 
555SS * Desenvolvimento e Implantapao de 
programas aplicativos 

* Cursos de Treinamento em Programagao 
Basic, Pascal, Forth. Lisp. Assembler, 

* Consultoria em Hardware e Software. 

* Assistencia Tecnica 



SRCCD 

microcomputadores 



Av.EuzebioMatoso. 167-CEP05423-S§oPaulo-SP-Tel814-0598 
Abenodas9as19hs.Sabadodas9as17hs.Estac»onamentorx) local. 



COMPOSiqAO DE PRECOS UNITARIOS 



180 LET 


B$(1G) ="16-RETIR CONDUITML=" 


182 LET 


Afl6) =18 


184 LET 


B$(17)="17-RETIR APAR ILUM=" 


186 LET 


A(17)=132 


188 LET 


B$C18)="18-RETIR APAR SANIT=" 


190 LET 


A(18)=780 


192 LET 


B$(19)="19-RETIR CX DAGUA=" 


194 LET 


A(19)=1300 


196 LET 


B$(20)="20-TAPUME TB PINHO" 


198 LET 


AC20}=2000 


200 LET 


B$(21-BARRACA0 TB PINHO=" 


202 LET 


A(21)=16132 


204 LET 


B$(22}="22-INSTAL PROV AGUA PT" 


206 LET 


A(22)=16159 


208 LET 


B$(23)="23-INSTAL PROV LUZ PT=" 


210 LET 


A(23)=2647 


212 LET 


B$(24)="24-INSTAL PROV FORCA PT= 



214 LET A(24)=8132 

216 LET B$(.25) = "25-INSTAL PROV SANIT PT= 

218 LET A{25)=16474 

220 LET B$(26)="26-LIMP TERRENO=" 

222 LET A(26)=42 

224 LET B$(27)="27-CORTE/ATERRO MANUAL M 

3=" 

226 LET A(27)=622 

228 LET B$(28)="28-SONDAGENS(MIN 40) ML= 



230 
232 
234 
236 
238 
250 
252 
254 
256 
258 

260 
262 
264 
266 
268 
270 
272 
274 
276 
278 

280 
282 
284 
286 

288 
290 
29 2 

294 

296 
302 
304 
306 
308 
310 
312 
314 
316 
318 
320 
322 
324 
326 



LET 
LET 

LET 
LET 
LET 
LET 
LET 
LET 
LET 
LET 
3=" 
LET 
LET 
LET 
LET 
LET 
LET 
LET 
LET 
LET 
LET 
L=" 
LET 
LET 
LET 
LET 

LET 
LET 
LET 
LET 
KG= 
LET 
LET 
LET 
LET 
LET 
7,ET 
LET 
LET 
LET 
LET 
LET 
LET 
LET 
LET 



A(28)=4550 

B$(29)="29-LOC FUNDACOES M2=" 

A(29)=90 

B$(30)="30-ESCAV MAN M3=" 

A(30)=760 

B${31)="31-ESCORAMENTO M2=" 

A(31)=2112 

B$C32)="32-APLLOAMENTO M2=" 

A(32)=137 

B$(33)="33-CINTA C A RESPALVEN M 

A(33)=37397 

B$(34)="34-BROCA 25 ML='' 

A(34)=1278 

B$(35)="35-EST PREMOLD 30T ML=" 

A{35}=2511 

B$(36)="36-EST STRAUSS 20T ML=" 

A(36)=1856 

B$(37)="37-EST STRAUSS 30T ML=" 

A{37)=2298 

B${38)="38-EST PERF METALH 6x6 M 

A(3B)=4649 

B$(39)="39-ATERRO INT M3=" 

A(39)=956 

B$(40)="40-C S PREP OBRA 250 KG 

A(40}=15S48 

B$(41)="41-FORMAS C A M2=" 

A(41)=2233 

B$(42)="42-FERRO CORT DOBR CA50 

A{42}=221 

B$(43}="43-C A ESTRUT 300KG M3=" 

A(43)=59221 

B$(44)="44-CURA CONCR M3=" 

A(44)=2470 

B$(45) ="45-ENSAIO COMP=" 

A(45)=20800 

B$(46)="46-ALVEN IT TIJ BAR=" 

A(46)=3171 

B$(47)="47-ALVEN 1/2T TIJBAR=" 

A(47)=1586 

B$(48)="48-ALVEN IT TIJ LAMIN=" 

A{48)=5402 

B$(49)="49-ALVEN1/2T TIJLAMIN=" 
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328 LET A(49)=2701 

330 LET B$(50)="50-ALVEN IT TIJBAIANO=" 
332 LET A(50)=2291 

334 LET B$(51)="51-ALVEN 1/2T TIJ BAIANO 
= " 

336 LET A(51)=H46 

338 LET B$(52)="52~ALVEN BL CONCR 20=" 

340 LET A{52}=2325 

342 LET B${53}="53-ALVEN BL CONCR 10=" 

344 LET A(53)=1516 

346 LET B$(54)="54-ALVEN PEDRA=" 

348 LET A(54)=9076 

350 LET B$(55)="55-ALV CORT C A300 KG M3 



352 
354 
356 
358 
360 
362 
364 
366 
368 
370 
372 
374 

376 
380 

382 
383 
386 
388 
390 
392 
394 
396 
398 
399 
400 
402 
404 
406 
408 
410 
412 
414 
416 
418 
420 
422 
424 
426 
428 
430 
4 32 
434 
4 36 
438 
440 
442 
444 

446 
448 
450 
452 
454 
456 
458 
460 
462 
464 
466 
468 



LET A(55)=51431 

LET B$ (56)="56-IMPERM FUNDM2='' 

LET A(56)=1324 

LET B$(57)="57-IMP PAR EXT/INT=" 

LET A(57)=1471 

LET B$(58)="58-IMP CX DAG/PISC M2=" 

LET A(58)=2505 

LET B$(59)="59-IMP LAJES=" 

LET A(59)=2025 

LET B${60)="60-IMP LAJES C/TERMEC=" 

LET A{60)=3802 

LET B$(61)="61-IMP JUNTA C/CH COBRE= 
ti 

LET A{61)=3529 

LET B$(62)="62-REV CHAP CIM AREIA 1: 

3=" 

LET A(62)=239 

LET B$(63)="63-REV INT GROS=" 

LET A{63)=450 

LET B$(64)="64-REV INT FINO=" 

LET A(64}=369 

LET B$(65)="65-REV EXT GROS=" 

LET A{65)=659 

LET B$(66)="66-REV EXT FINO=" 

LET A{66)=525 

LET B$(67)="67-PAST FAIANCA 4x4=" 

LET A(67)=5059 

LET B? (68)="68-PAST PORCEL 4x4=" 

LET A(68)=5193 

LET B$(69)="69-LITOCERAMICA=" 

LET A(69)=2922 

LET B$(70)="70-REV PED MINEIRA=" 

LET A(70)=3436 

LET B$(71)="71-REV PED GRANITO=" 

LET A(71) =4476 

LET B$(72)="72-REV MARM BR ESP STO=" 

LET A(72)=4625 

LET B$(73)="73-REV MARM TRAVERTINO=" 

LET A(73)=7486 

LET B$(74)="74-REV MARM PARANA=" 

LET A(74)=8526 

LET B$(75)="75-REV MARM TIJ PRETO=" 

LET A{75)=12815 

LET B$(76)="76-AZUL BR 15x15=" 

LET A(76)=3067 

LET B${77)="77-AZUL COR 15x15=" 

LET A(77}=3197 

LET B$(78)="78-AZUL DEC 15x15=" 

LET A(78)=3457 

LET B$(79)="79-AZUL CANT ALUM ML=" 

LET A(79}=854 

LET B$C80)="80-LAMBRIS CEDRO=" 

LET A(80)=1979 

LET B$(81)="81-LAMBRIS IMBUIA=" 

LET A(81)=2437 

LET B$(82)="82-LAMBRIS JACARANDA=" 

LET A(82}=2866 

LET B$(83)="83-REV CHAPA DURA=" 

LET A(83)=3813 

LET B$(84)="84-FOR TB PIN MAC/FEM=" 

LET A(84)=2640 
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APUCAQDES SERIAS 

C/programas listados por impressora. 

Folha de pagamento, balancete, contas a re- 

ceber, a pagar, correg5o monet^ria das contas 

do balance, corre^ao das contribuigOes do 

lAPAS, cadastre de clientes, conta banc^ria. 

tabela price, estatJstica, corregao de provas, 

editor de textos, ram toper, sub-rotinas em 

cassette, chaining programas, contando os 

bytes das linhas. do programa, das matrizes, 

economizando memoria, etc... etc... 

Incluindo: 

Conhecendo a impressora. vale a pena? Veja 

amostra do papel. 

Projeto compieto de teclado mecanico. com 

lay-out dos circuitos impresses, dos paineis e 

gabinete, etc... 

Langamento Cr$ 3.000.00 



TRINTA JOGOS 

Incluindo programas em cddigo listados 
por impressora. 

Jogo de damas. labirinto, guerra nas estrelas. 
enterprise, paredao, demolidor. velha. cassi- 
no, roleta russa. corrida de cavalos. golf, vinte 
e um, cubo magico. senha. banco imobiliario. 
bombardeio, som por software, etc... 
Langamento Cr$ 2.500.00 



45 PROGRAMAS 

Prontos para rodar 

Arquivos. estoque, piano contM. agenda te- 
lefonica. invasores. caga ao pato. apague a tri- 
Iha. jogo da velha. forca, dado, tabelas. tabua- 
das. conversao de coordenadas. media, pro- 
gressao. fibonacci. biorritmo. renumeradorde 
linhas em c6digo, etc... etc... 
4^Edigao Cr$ 3.000.00 




POI.IKDRO 

UVHOS TECNICOS 



R Aurora. 704 (|unioaPra- 
Qa da RepuWica. Fones 
221.6764 -220 7351 - 
222.4297 -223 9784 (OH) 



NACIDNAIS E ESTRANGEIROS 01209 830 PaulO. SP 



COMPOSigAO DE PREgos unitArios 



470 LET B$(85)="85-FOR CH DURA 60x60=" 

472 LET A(85) =2091 

474 LET B$(86)="86-FOR CH DURA TERMACUST 

476 LET A(86}=3729 

478 LET B$(87)="87-FOR PL GESSO=" 

480 LET A(87)=1960 

482 LET B$(88)="88-FOR ALUMINIO=" 

484 LET A(88)=6630 

486 LET B$(89)="89-FOR PVC RIG=" 

488 LET A(89)=2860 

490 LET B$(90}-"90-FOR LAJE PREL=" 

492 LET A(90}=4187 

494 LET B$ (91) -LAJE PREL=" 

496 LET A{91}=6326 

498 LET B${92)="92-LASTRO C S 6CM=" 

500 LET A(92}=1178 

502 LET B$(93)="93-CERAM ESM 7.5x15=" 

504 LET A(93)=2960 

506 LET B$(94)="94-CACO CERAM=" 

508 LET A(94)=2213 

510 LET B$(95)="95-PISO CERAM 15x15=" 

512 LET A(95)=2854 

514 LET B$(96}="96-PI50 CERAM 20x20=" 

516 LET A(96)=3864 

518 LET B$(97)="97-LAJOTA 30x30=" 

520 LET A(97)=2147 

522 LET B$(98)="98-PISO CERAM 20x30=" 

524 LET A(98)=4589 

526 LET B$(99)="99-PISO GRANILIT E=" 

528 LET A(99)=2123 

530 LET B${100)="100-GRANIL P/ ESC=" 

532 LET A(100)=2638 

534 LET B$(101)="101-PISO PD MINEIRA=" 

536 LET A{101)=2278 

538 LET B$(102)="102-PISO GRANITO=" 

540 LET A(102}=1937 

542 LET B$(103)="103-PISO PD ITAC0LOMI= 

544 LET A(103)=4599 

546 LET B$(104)="104-PISO MARM BR ESP S 

T0=" 
548 LET A{104)=5971 
550 LET B$(105)="105-PISO MARM TRAVERT= 



552 


LET 


A(105) 


= 9741 






554 


LET 


B$(106) 


= "106 


-PISO 


MARM PARANA=" 


bb6 


LET 


A(106}= 


=11301 






558 


LET 
0=" 

LET 


B$(107) 


= "107 


-PI SO 


MARM TIJ PRET 


560 


A{107) = 


16111 






562 


LET 


B$(108) 


= "108 


-PAVIFLEX 2MM=" 


564 


LET 


A(108)= 


3188 






566 


LET 


B$(109) 


= "109 


-TACO 


MAD 7x21=" 


568 


LET 


A{109)= 


2402 






570 


LET 


B$(110) 


= "110 


-PISO 


TB PER=" 


572 


LET 


A(110)= 


4432 






5 74 


LET 


B$(lll) 


= "111 


-FORMIPISO=" 


576 


LET 


A(lll)= 


3458 






582 


LET 


B${112) 


="112- 


-RODAPE GRANILT=" 


584 


LET 


A(il2)= 


1287 






586 


LET 


B$(113) 


= "113- 


-ROD 


PD MINEIRA=" 


5 88 


LET 


A(113)= 


730 






590 


LET 


B$(114) 


="114- 


-ROD 


GRANITO=" 


592 


LET 


A(114)= 


717 






594 


LET 


B$(115) 


="115- 


■ROD 


^1ARM=" 


596 


LET 


A(115)= 


2256 






598 


LET 


B$(116) 


="116- 


■ROD 


PER C/CORDA0=" 


600 


LET 


A(116)= 


579 






602 


LET 


B$(117} 


="117- 


ROD 


PAVIFLEX=" 


604 


LET 


A(117)= 


494 






606 


LET 


B${118) 


="118- 


PEIT 


CERAM=" 


608 


LET 


A(118)= 


948 






610 


LET 


B$(119) 


="119- 


PEIT 


MARM=" 


612 


LET 


A(119)= 


1442 







614 LET B$(120)="120-SOLEIRA CERAM=" 

616 LET A(120) =1046 

618 LET B$(121)="121-S0L MAR=" 

620 LET A(121)=1663 

622 LET B$(122)="122-MAD P/ TELHBARRO=" 

624 LET A(122)=3032 

626 LET B$(123)="123-MAD P/ TELHCIM AM=" 

628 LET A{123)=2415 

630 LET E${124)="124-COB TEL FRANC=" 

632 LET A(124)=1082 

634 LET B$(125)="125-COB TEL PAUL=" 

636 LET A{125)=2152 

638 LET B$ (126)="126-COB TEL PLAN=" 

640 LET A(126)=1497 

642 LET B?(127)="127-TEL FIB CIM8MM=" 

644 LET A{127)=1590 

646 LET B$ (128) -TEL CANALETE 90=" 

648 LET A{128)=1999 

650 LET B?(129)="129-TEL CANALETE 43=" 

652 LET A(129)=1982 

654 LET B$(130)="130-TEL ALUM IMI-1=" 

656 LET A(130)=3245 

658 LET B$(131)="131-TEL PVC=" 

660 LET A(131)=2297 

662 LET B${132)="132-TEL DOMOS FIBER=" 

664 LET A(132)=26660 

666 LET B$(133)="133-TEL DOMOS ACRILICO= 

668 LET A{133)=46160 

670 LET B$(134)="134-PORT MAD INT C/ BAT 

FER=" 
672 LET A(134)=12007 
674 LET B${135) = "135-:PORT MAD EXT C/ BAT 

FER=" 
676 LET A{135)=14386 

678 LET B$C136)="136-JAN MAD CORC/ VEN=" 
680 LET A(136)=14824 
714 PRINT B$(C) ;INT(K*A{C)) 
718 NEXT C 

720 PAUSE 400 

721 POKE 16437,255 

722 CLS 

730 SLOW 

731 LET T=0 

732 PRINT "QUANTOS ITENS VOCE VAI USAR? " 

733 INPUT I 

734 CLS 

738 FOR M=l TO I 

740 PRINT "QUE ITENS VOCE VAI USAR?" 

750 INPUT C 

760 PRINT "QUANTAS VEZES? (QUANTIDADE) " 

770 INPUT Q 

780 PRINT B$CC);INT (K*A{C}) 

790 PRINT "TOTAL= ";Q;"*";INT (K*A(C));" 

=";TAB 24; INT (Q*K*A(C)) 
792 LET T=T + INT (Q*K*A(C) ) 

794 NEXT M 

795 PAUSE 600 

797 POKE 16437,255 

799 CLS 

800 PRINT "TOTAI. DO CUSTO DA OBRA NESTE 
PROGRAMA=";T 

810 PAUSE 600 

820 POKE 16437,255 

830 CLS 

840 PRINT 9,12;"SATISFEITO (S/N)?" 

850 INPUT S$ 

855 CLS 

860 IF S$="N" THEN GOTO 20 

870 IF S$="S" THEN PRINT AT 19,2;"OBRIGA 

DO- ATE LOGO" 
880 PAUSE 180 
890 POKE 16437,255 
900 CLS 
910 STOP 
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Obtenha sua bolsa 

deestudoscom 

10% a 50% 

de desconto 

processarrif^ 




• L inguagem Basic, Cobol, Fortran e 
Assembler 

• Contato direto com o computador 

• Aulas expositivas e pr^ticas 

• Suporte para alunos 

• Fornecimento de material did^tico 

• A ulas aos S^bados. 
TURMAS:_MANHA / TARDE / NOITE 
INSCRICOESPARA NOVAS TURMAS 

VAGAS LIMITADAS 
CERTIFICADO DE CONCLUSAO 

SCREEf^ 

Av. Eng. Luis Carlos Berrine. 991 
tone: 531-5008 




CURSO BASIC 



Turmascom lOalunos 

Aulas pfciticas e tedricas 

Hordrios: manha 8:30 hs k& 10:30 hs 
tardel 4:00 hs^l 6:00 hs 
noite20:00hs^22:00hs 
MATRiCULAS ABERTAS 

Rua Vise, de Piniji, 540 U 106 - 
22.410 Ipanema Rio RJ 
Tel. 259-1516 
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Qamos Games 
Games GamM 
Games Gamr^l 
Games GaaeC^ 
GamaaC 



.mas Games ( 
ames Games ( 
ames Games ( 
Games GamBB< 
Games Games r 



Ganwj^jj^^^ Games Games Games ( 
0»y^W^I^% Games Games Games ( 



0>^Games Games Games Games ( 
!rtes Games Games Games Games ( 
^ames Games Games Gamed Games ( 



A MICRO BOARD 6 a mais 
nova Software House do Bra- 
sil. 

• Jogos e aventuras em f itas 
e disquetes, para: Unitron, 
MicroEngenho, DEL, Maxxi, 
Apple II, CP500, CP200, 
TK82-CJK85, etc. 

Procure o selo de qualidade 
no seu revendedor de con- 
fianga ou pelo reembolso 
postal. 



MICRO BOARD 

Caixa Postal; 18968 - CEP ■ 04699 
SPFone (011)-532-0923 



VATECK 



ELETRONICA LTDA. 



ASSISTENCIA 
TECNICA 



DIGITUS. PROLOGICA 

AUTORIZADO 

VIDEO CASSETE - ATARI 

400-2600 

COMSERTO TRAMSCODIFICACAO 

MICROS - TRAMSFORMACOES 

DIVERSAS 



Rua Visconde de Piraja. 82 suhsiilii lujrf 
I15-Ipftn^ma-Rir.-Rj Tel. 247-7842 
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corsArio 



Para qualquer IJpo de Microcotn- 
puUdor 

• Venda 

• [nstala^ao 

• AdapiagSo 

• Manuten<;:ao 



Tel. (02O24S-S29O 
Caixa Posial 33. 121 ■ Rio 
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UMA FIRMA ESPECIAUZADA EM FOflNECER 
A INFORMATICA 



- SEMICONDUTORES E PERIFERICOS 
- EXCLUSmmEMTE PARA AS INDUSTRIAS 

- DA Area de informatica 

- CMdS TTLS DISPLAYS MEM6RIAS 

- TRANSISTORES - DIODOS - D/SKETS 



c dsbA apoio rapido e seguro 
A imformAtica 



Rui Viiirli. 210 Conj. 2 

TBlifonet: 223 1622 s 223 3S46 CEP 012210 

Sm Paulo ' SP. 



OS 

MICROS 
ESTAO All 
APRENDA A 
PROCRAMA-LOS 



m^sssssss^- 



Se voce deseia dprender a programar mi- 
crocompuladpres, esta e a sua chance! 
Sim, porque a SULLIVAN Microcompula- 



nalizanles desde 1973, lem o que ha de 
melhor e mais atualizado para fazer de 



' capacitado a operar micro- 
compuladores. 

Veja nossos cursos, por freqii^ncia ou 
correspondencia: 



Basico de Eletronica Digital 
Basico para Microcompuladores 
Mkro-processador 80S0 e auxilia- 
res 

Micro-processadores Z-80 
Inlegrado, englobando 3 dos cur- 
sos acima 

Linguagem BASIC especifico para 
Microcompuladores 



Nao ha misterio. £ escolher e aprender. 

— SULLIVAN 

MICROCOMPUTADORES ITDA. 

/R. Siqueira Campos, 43 - Gr. 703 
CEP 22031 - Rio - R|. 
Planlao telefonico 24 hs. 
Tel.: (021) 295-0169 



MICRO 
CONSORCIO 



Grupos de Microcomputadores 
Nacionais de todas as marcas 

VENDA DE 

— Microcomputadores 

— Software 

. — Assistencia tecnica 



Av. Rio Branco. 156 Gr. 1 .420 ■ Tels.: 262-8737 e 262-0786 - RiO. 
Administragdo: Barros e Barros 
Admjnistradora de Cons6rcios Goodway Ltda. 
aut. Rec. Federal n? 03/07/080/82 




POLIEORO 



LIVRARIA POLIEDRO 

R. AURORA, 704 - TELS : 223-9784 - 221-6764 - 220-7351 
222-4297 - (METRO REPUBLICA) ■ SP. 



INTROOUQAO AO V1SICALC, Garbiii 2.200, 

BASIC PARA MICRO PESSOAIS. Pereira 2.800. 

CRIANQA TAMB^M FAZ PROGRAMA. Silva 1 .300, 

8080/8085 ASSEMBLY LANGUAGE PROGRAMMING, Intel . . . 9,600, 

MCS 80/85 FAMILY USER'S MANUAL, Intel 9.600, 

MICROPROCESSOR PERIPHERALS UPl-User's manual, Intel . . 8.000, 

LINGUAGEM BASIC, Mirshawka 3.700, 

8086/8088 16-bit Microprocessor Primer, Morgan 15.900, 

ARMCHAIR BASIC. Fox 9.950, 

DATA BASE MNGTE SYSTEMS-Microcomputer 

software, Kruglinski 13.800, 

TOP-DOWN BASIC FOR TRS-80 COLOR COMPUTER, Skier .... 14.430, 

APPLE II, user's guide {Osborne). Poole 11.550, 

CP/M user's guide (Osborne). Hogan 10.900, 

BUILD YOUR OWN Z-80 COMPUTER, Ciarcia 9.000, 

DiCIONARIO DE INFORMATICA. Sucesu 7.000, 

DICIONARIO DE TERMOS CHAVES. lngl6s-Porl. Bussotti 800, 

MICROPROCESSADORES 8080/8085 - Hardware, Visconti . , . 2.100, 
MICROPROCESSADORES 8080/8085 - Software. Visconti . . . , 2,450. 

MICROPROCESSOR DATA BOOK, Money 25,000, 

BIT-SLICE MICROPROCESSOR DESIGN, Mick 21 ,000, 

*Pedidos REEMBOLSO POSTAL/VARIG para Catxa Postal. 386 - 01000 
Sao Paulo, SP 




Neto, J. p., 
"Dicion^rio de 
Telecom unicaqdes ' 
Editora Rio, 
Biblioteca 
Telebrasil, 
CrS 6.160.00 
(maio/83}. 



O "Dicion^rio de Telecomunica?oes" 6 uma obra ine- 
drta no Brasil por ser o primeiro livro a reunir termos em 
telecomunicapoes constantes de normas e dicion^rios dis- 
perses. 

A primeira parte do livro centum defini?oes de ter- 
mos e expressoes t6cnicas empregadas em telecomunica- 
Coes, com o correspondente termo em ingles. A segunda 
apresenta um dicion^rio ingles/portugues com as expres- 
soes definidas anteriormente e mais algumas, permitindo 
uma consulta r^pida quando na tradupao de um texto 
t§cnico em ingles. 

A ultima parte constitui-se de diversos anexos com os 
seguintes temas abordados; 

• Codigo Z: usado em circuitos telegrSficos comerciais; 

• C6digo Q: usado no servigo mbvel man'timo e autori- 
zado aos r^dio amadores, na forma e com o signiflcado 
estabelecido nas convengoes internacionais; 

• Abreviaturas e sinais diversos; 

• Servipo de r^dio amadores: cont^m as faixas de fre- 
quencia para as diversas classes com os correspondentes 
tipos de emissSo; 

• Tabela do servipo de radiodifusaodesons e imagens; 

• Sistema internacional de unidade: cont^m grandezas 
com o nome, sfmbolo e definipoesdas unidades referen- 
tesa cada umadelas. 

O livro se baseia em normas da Telebr^s e A.B.N.T. e 
em dicion^rios, como o do I.E.E.E. Esta e uma obra in- 
dispensdvet para engenhetros de telecomunicagoes e ele- 
tronicos, t^cnicos, estudantes de engenharia, estudiosos 
da ^rea e pessoal qualif icado em documentapao. 



M 




ro 



Em estado E3 e as interruppoes, MS n9 19,abril/B3, 
pdg. 20, por faiha da montagem, todas as referencias aos 
sinais 61 e 62 sairam apenas com os numeros 1 e 2, 
sem OS respectivos es. Uma leitura cuidadosa, tendo em 
mente este detalhe fundamental, certamente permitirdo 
entendimento correto do texto. 

E na 4? aula do Curse de Assembler, fVIS n? 20, 
maio/83, p^g. 90, as representagoes corretas do erxlere- 
pamento de mem6ria e do conteudo de um regrstrador 
ou locapao de membria, sao, respect ivamente, as seguin- 
tes: 



[( )] 
[ ] 



[VIICRO SISTEMAS, junho/83 




Um programa simples, que vai ajudar voce, principiante. a aprender 
e uiilizar melhor os recursos de seu micro. 



Jogue dados no seu 
NE-Z8000 




Newton Duarte Braga Jr. 



13 



Descriijao das linhas: 



Este programa de geraijao de dados randomicos e sim- 
ples, mas dara a vocd a oportunidade de conhecer o 
mecanismo de diversos jogos possiveis de serem feitos no 
seu microcomputador. Ele foi feito para o NE-Z8000 e 
seus comandos sao muito faceis de enlender. Vamos 
jogar? 

Para o armazenamento em fita cassele, acompanhe o 
esquema moslrado na figura 1. 



Em X e armazenado um valor aleatorio, que pode 
variar de I a 6. 

Selepao de impressao: depende do valor de X: o 
fluxo do processamento e desviado para a impres- 
sao correspondente ao valor de X. 
Imprime a mensagem "FA^A O LANC^^AMEN- 
TO" e solicila uma entrada que. se for "KILL", 
interrompe a execut;ao do processamento. Se vo 
ce desejar outro lani;amento. basta pressionar 
qualquer tecia, ou entSo pressionar direlamente 
ENTER, apos o qual o processamento desvia-se 
para a determinatjao de um novo X e. conseqDen- 
temente, para a impressao do novo lant^amenlo. 
Se o seu NE-Z8000 possuir uma jmpressora. faga as 
seguintes alteracoes no programa: 



15 



900 



902 



digital 
LIST 



poslcionar 
fita 



dlgitar 
SAVE "DADOS" 



pressionai 
REC e PLAV 



Klgura 1 



(pressionar 

ENTER I 



pressionar/ 
ENTER / 



Antes de carregar o programa, observe a ordem que 
consta na figura 2. 



digitar 
NEW 



posicionar 

fita 



digitar 
LOAD"DADOS" 



pressionar 
PLAY 



press ionaj 

ENTER 



figura 2 



pressionar) 
ENTER / 



Linha 




Altera(;ao 


101 GOTO 900 


101 


WSaUT AT 10, 

1S;A$ 


201 GOTO 900 


201 


LPBINT AT 8,1 
3;RJ;AT 12,17 


301 GOTO 900 


301 


LPRINT AT 8,1 
3;AJ;AT 10,15 
;A$;AT 12,17; 
AJ 


401 GOTO 900 


401 


LPBINT AT 8,1 
3;BJ;AT 12,13 
;B$ 


501 GOTO 900 


501 


LPSINT AT 8,1 
3;BS!AT 10,15 
;A$;AT 12,13; 





Incluir: 


102 


GOTO 900 


202 


GOTO 900 


302 


GOTO 900 


402 


GOTO 900 


502 


GOTO 900 


601 


LPRINT A 




T 8,13;B 




$;AT 10, 




13;B$;AT 




12,13;B 




$ 



1 REM "DAtXJS" 














2 REM 13/03/82 








301 


GOTO 900 




3 CLEAK 








4D0 


PRINT AT 


8,13jB5;AT 12,13;BJ 


4 LET A$="," 








401 


GOTO 900 




5 LET B$=". 








500 


PRINT AT 


8,13;Bi;AT 10,15;fl$;AT 12,1 


11 GOTO 900 










3;B$ 




13 LET X=INT [RND*6)+1 








501 


GOTO 900 




15 GOTO lOO'X 








600 


PRINT AT 


8,13;B$;AT 10,13;B$;AT 12,1 


100 PRINT AT 10,15,-A» 










3;B» 




101 GOTO 900 








900 


PRINT AT 


21,0;"FACA LANCAMENTO" 


200 PRINT AT 8,13;A$;AT 


12 


17 


A$ 


901 


INPDT LJ 




201 GOTO 900 








902 


IF L$="KILL" THEN STOP j 


300 PRINT AT 8,13;AJ;AT 


10 


15 


A?;AT 12,1 


903 


CLS 




7:AS 








904 


GOTO 13 







m 



Newlon Duarte Braga Jdnior teni curso de 
programa^ao COBOL e programai,-ao t-'OR- 
TRAN pela I'niversidade Federal de Minas 
(ierais. Seu interesse por eletrAnka coniei;ou no 
curso da Escola Tecnica Rezende Ramell c, a 
partir de 1980, vem ampliando seu.s conhecimen- 
los na Area de compula^ao. em especial, micro- 
conputai^ao. Tanio que hoje jA possui dois des- 
ses equipamentos. 
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0110 


0111 0100 


0000 


1100 


Tn 


^^ 


^■^ 


^^^ 


ttonn 


1000 ooto 1 








^N 




ilGO 
1000 
0101 


^Hff 


™ 


^^**. 


1011 


ir 




\, 


1 


om 


oiig 


r 




s 




1111 


nof 




^% 




, 
V 


OOQO 


''1 




luj' 


k 


\J 


OODl 


OIti 




Xii 


"s. 


Y 


IQOO 


lion 


t 




\ 


^ 


.0010 


1011 


^ 




\ 




\do 


nil 


iioP 


*^ 


Mnt^ 


L 


^ 



Curso de 
Assembler - 



V 



N 



as ligoes anteriores descrevemos os conceitos 
basicos necessdrios para a programaqao de 
microprocessadores e a partir daqui comepare- 

mos a detalhar todo o set de instrugoes do micro- 

processador Z80. 

Vamos entao descrever as instrugoes que compoem 

grupo de carga de registradores de 8 bits. Estas ins- 
trupoes tern as seguintes f inalidades: 

— Carregar um numero entre e 255 em um dos re- 
gistradores de 8 bits; 

— A movimenta<pao do conteudo de uma positpao de 
memoria para um dos registradores de 8 bits; 

— A movtmentapao do conteudo de um registrador de 
8 bits para outre registrador de 8 bits do micropro- 
cessador; 

— A movimentagao do conteudo de um registrador de 
8 bits para uma posipao de memoria. 

Vamos agora a uma descripao das instrugoes que 
executam as fungoes acima ; 

1 — Move registrador para registrador 

Formato: LD r, r' 

Operagao: Move o conteudo do registrador fonte 
(r') para o registrador de destino (r). 

Cddigo objeto: 



LD 


r 


r 
T 


1 


r- 


r' 














1 
1 

1 


d 


d 

1 


- 


S 


1 

s 
1 


s 



000 para ddd ou sss 

001 para ddd ou sss 
010 para ddd ou sss 
Oil para ddd ou sss 
100 para ddd ou sss 



registrador B 

registrador C 

registrador D 

registrador E 

regi strador H 



101 para ddd ou sss = registrador L 
111 para ddd ou sss = acuHulador 

EXENPLO: 



LD A , H 








1 1 1 1 1 1 1 

111110 

1 1 1 1 1 1 1 
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Descrigao: conteudo de algum registrador r' 
de 8 bits 6 carregado em outro registrador r de 8 bits, 
identificado por B, C, D, E, H, L ou A. 



LO 



H,L 



H < 



Ciclos de maquina (M): 1 

States (T): A 

Flags afetadas: Nenhuma 

Vejamos um exemplo. Se o registrador D contem o 
numero 65 e o registrador C contem 10, apos a exe- 
cugao da instrugao LD C, D o valor 65 estara contido 
no registrador C, aldm de continuar inalterado no re- 
gistrador D. 

2 — Move constante para registrador 

Formato: LD r,n 

Operagao: Carrega uma constante n de 8 bits em al- 
gum registrador r de 8 bits. 



Cddigo objeto: 



LD 



1 1 1 1 1 

d d d 1 


1 
1 


4 •- > 


1 1 1 1 1 


r\ 



000 


para 


ddd 


= 


registrador 


B 


001 


para 


ddd 


= 


registrador 


C 


010 


para 


ddd 


= 


registrador 


D 


oil 


para 


ddd 


= 


registrador 


E 


100 


para 


ddd 


= 


registrador 


H 


101 


para 


ddd 


= 


registrador 


L 


111 


para 


ddd 


= 


acuHulador 




EXENPLO: 












LD 


A 


. 64 





Cddigo objeto: 



LD 


r 


r 
T 


-» 


(HL) 








1 
1 

1 


d 


d 

J L 


d 


1 1 
1 1 

1 1 







' 




' 











1 — ' 



r 
1 


1 


1 


1 


1 








1 








» 


- 




1 


" 



>3E 



Descriqao: Um inteiro n de 8 bits e carregado em 
algum registrador de 8 bits, identificado por B, C, D, 
E, H, Lou A. 



000 para ddd 

001 para ddd 
010 para ddd 
Oil para ddd 

100 para ddd 

101 para ddd 
111 para ddd 
EXEMPLO: 

LD 



registrador 
registrador 
registrador 
registrador 
registrador 
registrador 
acuBulador 

. (HL) 







( 




— 1 











1 


1 

_ 








■ 1 

1 

1 


1 






LD 



8,15 



B 4- 



15 



Cicios de maquina (M): 2 
States (T): 7 (4,3} 
Flags afetadas: Nenhuma 

Como exemplo, apos a execugao da instrugao LD 
E, ASH, conteudo do registrador E sera A5H. 

3 — Move mem6ria para registrador 

Formato:LD r, (HL) 

Operagao: Move o conteudo de uma posigao de me- 
moria enderegada por HL para um registrador r de 8 
bits. 
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Descrigao: conteudo da locagao de memoria 
apontada pelo par de registradores HL e carregado no 
registrador r de 8 bits, identificado por B, C, D, E, H, 
L ou A. 

LD A,(HL) A A (HL) 

Ciclos de maquina (M): 2 

States (T): 7 (4,3) 

Flags afetadas: Nenhuma 

Como exemplo, se o par de registradores HL con- 
tem numero 7000H e o enderego de memoria 
7000H contem o byte 5FH, a execugao da instrugao 
LD B, (HL) move para o registrador B o byte 5FH. » 




Profissional - Ctentifico 
CPU 8085 a 6. 144 MHZ 64 KB dc RAM 
ate 4 diskettes de 8" PadrSo IBM 
3740 c 4 discos rfgidos de 6 ou 12 M 
Bytes Imprcssora ate 160 CPS 
lotalmente modular 

Em breve CPU dc 16 Bits 

com 256 Kbytes de RAM e sistema 

muhiusuario 

O micro NacionaJ de categoria 
Intern acional 

Maior desempcnho com menor custo 
na sua (aixa de mercado (Prologica 
S-700. Quartzil. ..) 

• Aplicativos espccialmente 
desenvolvidos para a real neces^dade 



V 



de sua empresa 
Utilttarios 



KALHAU ENGENHARIA LTOA. 

Pra^a Tiradentes. 10/402 (021) 252-2752 
Cep. 20.060 • RJ • IDas 8:00 hs As 22:00 hs 
Sibado 8:00 hs- 17:00 hs. 



• Jogos 

• ComercializagSo programas de 
terceiros 

• Perifcricos 

• Acessorios (Diskettes, Formul&rios. 
etc.) 

• Uvros e revistas tccnicsB 

• MobiliSrio para seu micro 

• Treinamento especial para emprcsas 

• Financiamentos e Leasing 

• Despachamos para todo Brasil 
Garantimos os melhores pre?os e 
formas de pagamento da pra^a 
(Antes dc comprar nflo deixe de nos 
consuhar) 



Pessoal e Scmi-Profissiona] compatiuci 
com TRS-80 CPU Z80A a 2.5 MHZ 

Sistema modular 

Interface para cassctes de aha 

velocidade e ate 4 diskettes dc 5 1/4" 

EM BREVE 

CPM 

Aha rcsolugao de video 

Testes efetuados pelas revistas 
especializadas comprovam seu grande 
desempcnho na sua faixa (DISMAC 
D-8000, CP 500. ,..) 

CURSOS 



Basic e Basic Avan^ado 
CPM /DOS 
Assembler 



J 
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CURSO DE ASSEMBLER - V 



4 — Move memoria para registrador 

Formato: LDr, (IX +d) 

Operagao: Move o conteOdo de uma posigao de 
memoria indexada por IX para urn registrador r de 
8 bits. 



Cddigo objeto: 



LD 



<IX+d) 



1 


1 





I 
1 1 


1 — 
1 


1 — 



T — 
1 





1 


d 


d d 


1 


1 











1 


1 


— 


1 


^ 


1 





000 para ddd 

001 para ddd 
010 para ddd 
Oil para ddd 

100 para ddd 

101 para ddd 
111 para ddd 



registrador B 
registrador C 
reg istrador D 
registrador E 
registrador H 
registrador L 
acuHulador 



EXEHPLO: 



LD 



(IX+5) 



I'l'o'i'i'i'o'i 


10 110 


10 1 

1 1 1 1 t t 1 



>- DO 



> 05 



Descrigao: conteudo da posipao de memoria, 
apontada pela somatoria do conteudo do registrador 
IX mais o deslocamento (d), e carregado no registra- 
dor r de 8 bits, identif icado por B, C, D, E, H, L ou A. 



LD D,(IX + 13H) 



A <- 



(IX + 13) 



Ciclos de maquina (M): 5 

Stefes/TA- 19 (4,4,3,5,3) 

F/ags afetadas: Nenhuma 

Como exempio, se o conteudo do registrador IX 
^ 7000H, a instrugao LD D, (IX+ 13H) causa a movi- 
mentapao do conteudo de memoria na posipao 7013H 
{7000H+13H) para o registrador D. 

5 — Move memoria para registrador 

Formato: LDr, (lY +d) 

Operagao: Move o conteudo de uma posigao de 
memoria indexada por lY para urn registrador r de 8 
bits. 

Cddigo objeto: 





LD r , (IY + 

1 


d) 

1 


-> 


i'i'i','i'i'o'i 


<- 


1 d d d 1 1 




^ k 




{ 1 1 1 1 1 1 



000 para ddd - registrador B 

001 para ddd = registrador C 
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010 para ddd 

Oil para ddd 

100 para ddd 

101 para ddd 
111 para ddd 



reg Istrador 

registrador E 

registrador H 

registrador L 
acuaulador 



EXENPLO: 



LD 



(IY+5) 





' 1 




[ 1 1 1 1 1 1 

1111110 1 


> 


10 110 


10 1 

1 1 ! 1 1 1 1 



>FD 




Descn'qao: conteudo da posipao de memoria, 
apontada pela somatoria do conteudo do registrador 
lY mais o deslocamento (d), 6 carregado no registra- 
dor r de 8 bits, identificado por B, C, D, E, H, L ou A. 



LD 



A,(IY + 13) 



A -4- 



(IV + 13) 



Cicfos de maquina (M): 5 

States fT): 19 (4,4,3,5,3) 

F/ags afetadas: Nenhuma 

Vejamos urn exempio. Se o conteudo do registra- 
dor lY ^ 7000H, a instrupao LD D, (lY + 13H) pro- 
voca a movimentapao do conteudo de memoria na 
posipao 7013H (7000H + 13H) para o registrador D. 

6 — Move registrador para memoria 

Formato: LD (HL), r 

OperaQao: Move o conteudo do registrador r de 8 
bits para a posipao de memoria apontada pelo par de 
registradores HL. 



Cddigo objeto: 



LD (HL), r 






















1 


1 


1 





s 


s 


s 



000 para sss 

001 para sss 
010 para sss 
Oil para sss 

100 para sss 

101 para sss 
111 para sss 



registrador B 

registrador C 

registrador D 

registrador E 

registrador H 

registrador L 
acuaulador 



EXEHPLO: 



LD 



(HL), C 



I I I I 



Ij? 



1 1 o^^_o^o^ 



Descrigao: conteudo de um registrador r de 8 
bits e carregado na locapao de membria apontada pelo 
par de registradores HL. 



LD (HL),C 

Cicios de maquina (Mj: 2 
Sfares^T";.' 7(4,3) 



(HL) ^ 
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Um exempio: se o conteudo do par de registradores 
HL especifica a loca<;^o de mem6ria 5000H e o regis- 
trador B cont^m byte 3QH. ap6s a e^cecupslo de 
LD (HD^B endere^o de memiria 5000H conter^ o 
valor 30H. 

7 — Move registrador para memiria 

Formato: LD (IX +d|, r 

Opera^ao: Move o conteudo de um registrador r 
de B bits pare uma posipio de rriern6ria indexada por 
IX. 



EXEMPLQ: 



LD (ix + nl 



^T^T 1 r 1 r 1 ■ 
110 1110 1 


1 1 10 1 


1 10 1 

! 1 . 1 ! 1 . 




C6dfgo objeto: 



Deschgao: conteL]do do registrador r de 8 bits^ 
rarregado na posipSo de mem6ria dada pela somatdria 
do conteOdo do registrador IX mais o desfocamento 



LD 



(IX4d) 

I 



— I — I [ — 1 — I — I T 

110 1110 1 



1 1 1 3 S 3 



h 



LP 



(IX + 5),H 



fix 



5) H#. 



d 



J L_: 



000 para ssa 

001 para 3S3 
OTO par4 333 
Oil para ass 

100 para sss 

101 pits 33S 

1t1 pdra 333 



registrador B 

registrator C 

registrador D 

registrador E 

registrador H 

registrador L 
acuaulador 



Cicfos de maquina (Mj: 5 
Sf^fe^m.- 19(4,4.3,5,3) 
F/ags afetadas: Nenhurna 

Um exempio; se o registrador C cont^m o byte 
ICH e registrador IX cont^m 3^Q0H, ent§o a ins- 
trupao LD (IX + 6H), C executa a soma 3100H + 6H 

e carrega O valor fCH na locapSo de memdria 3T06H. 

6 — Move registrador para mem6ria 

Formato: LD (lY +d), r 

OperafSo: Move o conteiido de um registrador r 
de 8 bits para uma posipao de memiria indexada por, 
lY. i 







VENDA DE MJCROCOMPUTADORES 



cr.soo 



o-ma 



TXWC 



ALFA.SOCn 



DIGmJS OCT IV 



TESBI Eflgenlivrit d« Tetocomunitac^! Uda. 
DumntlrKfiei a Vandi: Rui Guillwinina. 638 - RJ. 
T«f.: (021) &gV3297 i 249-3tG& / CaiXl POStH 63008. 



VENDAS DE PROGRAMAS 



LANCAMENTO 

FluxD dv Ctlxa 4 comas a rpcdb^ r a poqnr cfvM, 

AdusSo. vtc. p/DlGHUS E DISMAC - 

prei^D Cr» 38.990.00 



Temta tambim mprimfntoa: 

Form uidrios oontintio§^ diatetea^ fitoa p/ tmprwsiOftA. 

D«sp«chafno3 para icKki Brasil median re Ordcm de 
Pacamento ou CtiBque nomlnaJ ccm ecr^clmo de 
10% para frete « ombtfagafn. 
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TESAI -^ EnganhBrU d* T*l«CDmurticq^9« Lidi. 
PROGRAMAS 



|']SAiVMMDaa» TSII 






C^ 15.990.00 


r V Bvtco (!■ D«dol ■ T^l 






Cri i».»a.QO 


[* k CMcuio d« LifH micion 






at iooxjo 


r 'rFoJtudAfAovnanlo 






Cfti9.gscxn 


OXMlfKrll 






Cft (NQ.OD 


n tKa^jrQ5-CP20O NEZflOOOr 


'1 DIGITUS 


C}ISMAC 





Anauq 4nctkrfeD chsqufi n* 

Bmoo ^^ 

1 crt ^ 



do 



.nov«hKd« 



UtUftOffV. 



Mau '■ndHvgo; 



CtP:. 




CURSO DE ASSEMBLER - V 



Cddigo objeto: 





LD (lY+d) , r 

1 1 


> 


i',',','i'i'o'i 


1 1 1 s s s 


^ k 


^, , , 1" , , ,► 



Descrigao: Dm inteiro n de 8 bits 6 carregado na 
posipao de memoria dada pelo conteudo do par de 
registradores HL. 



000 para sss 

001 para sss 
010 para sss 
Oil para sss 

100 para sss 

101 para sss 
111 para sss 



regi strador B 

registrador C 

registrador D 

registrador E 

registrador H 

registrador L 
acuBulador 



EXEHPLO: 



LD (IY+13) , C 



i',','i'i'i'o', 


1110 1 


^^^^^^^' 




Descrigao: conteudo de um registrador r de 8 
bits ^ carregado na posipao de nnem6ria dada pela so- 
mat6ria do conteudo do registrador lY mais o deslo- 
camento (d). 



LD 



(lY + 5),H 



(lY * 5)-4^ 



Ciclos de m^quina (M): 5 

States m:^W A. 3^,3) 

Flags afetadas: Nenhuma 

Como exempio, se o registrador D cont^m o byte 
50H e registrador lY cont^m 3100H, entao a ins- 
trupao LD (lY + 10H), C executa a soma 3100H + 
10H e carrega o valor 50H na locaipSo de memoria 
3110H. 

9 — Move constants para mem6ria 

Formato:LD (HL),n 

Operagao: Move uma constante n de 8 bits para 
uma posi(pao de mem6ria enderegada por HL. 



Cddigo objeto: 



LD (HL) 



o'o'i'i'o'i 


I'o 


^ ri k 


1 1 1 1 1 1 1 



EXENPLO: 



LD (HL) , 50H 



— I — I — I — I — I — ^~^ — 
110 110 



10 10 0,0 

__l 1 I I 1 I L_ 



36 
50 



LD (HL),5H 



{W\.)< 5H 



Ciclos de mSquina (M): 3 

States(T):\0{^.3.3) 

Flags afetadas: Nenhuma 

Como exempio, se o conteudo do par de registra- 
dores HL e 4000H, a instru(;:ao LD (HL), 49H carrega 
no enderego de memoria 4000H o byte 49H. 

10 - Move constante para mem6ria 

Formato: LD (IX + d), n 

Opera^ao: Move uma constante n de 8 bits para 
uma posigao de mem6ria indexada por IX. 



Cddigo objeto: 



LD (IX+d) , n 

I L 



— I — I — I — I — I — I — I — 
110 1110 1 



00110110 

— I — I — I — I — I — I — I — 



EXEHPLO: 



LD (IX+5) , 25 



- r_ 1 1 1 1 1 1 
110 1110 1 


110 110 


10 1 


1 10 1 

1 1 1 > ! 1 1 



DD 
36 
05 
19 



Descrigao: operando n de 8 bits e carregado no 
enderego de mem6ria dado pela somatbria do con- 
teudo do registrador IX com o deslocamento (d). 



LD 



(IX + 5), 64 



(IX + 5) -4^ 



64 



Ciclos de miquina (M): 5 

Scares ^T";.- 19(4,4,3,5,3) 

Flags afetadas: Nenhuma 

Como exempio, se o registrador IX cont^m o nu- 
mero 5200H, a instrugao LD (IX + 5),5AH resulta na 
gravag§o do byte BAH na posip§o de mem6ria 5205H 
(5200H + 5). 

No prbximo niJmero continuaremos a descrigcio das 
instrugOes do microprocessador Z80. 



Amaury Corna de Almeida Moraes Junior 4 formado pelo curso de 
AnSllsa de Sistem^ da FASP, tendo felto diversos cursos de aperfel- 
goamanto nas dreas de EletrSnica Digital e Microprocassadoies. 
Amaury trebatha como Analista na PR0D£SP, na Area de mini/micro- 
processedores, presta consultoria a ampresas para a implanta^o desls- 
temas da microaympuladores e 4 professor de Assembler na Sacco Ml- 
crocomputadoras. Software a Hardware, em SBo Paulo. 




As fdrmulas de Ekeiund e Ford, para cdlculos de Engenharia 
Metalurgica, programadas para a HP-25. 



apHcsacCies 



Metalurgia: Calculo de 

Carga de Laminagao 

a Frio na HP-25 



Eduardo Pogas Leitao 



Este programa foi feito com vistas a seu uso per estudantes dos cursos 
universitarios de Metalurgia e foi elaborado para a calculadora HP-25C. Ele 
visa achar as variaveis P e R' das seguintes formulas: 



1) fOrmula-ekelund 



tl,6u/R' Ah- 1,2 Ah 1 
hi + hf J 



P=b.S /R* Ah 

2) FORMULA FORD 

R'=R |1+ 2 cP 
I bAh J 



£ precise achar R' e entao P. Pelo metodo interativo, comeca-se com R' = 
R em Ekeiund, achando P. que entao e aplicado em Ford, donde surge um 
novo R". que e comparado com o anterior. 

As memorias enderegaveis do programa sao; 



R' 

S 
Ah 



hx 
R 
c 
b 



= hf + hi 



Como resoiu(;5es. teremos o y Slop = P, o 2p Stop - R" e o i? Slop = 
R'l/R*. Como condi(;ao. temos que R'l/R' ^ 1.05, e como rcstrigao. F fix J. 

Espero. com esta pequena contribui(;ao, dar um eslimulo aos alunos dos 
cursos de metalurgia para que desenvolvam programas de aplicac-ao direia 
para calculadoras. que muito facililariam a vida academica e profissional. 



PAS so 


FUNgAO 


cOdigo 


1 


RCL 


01 


24 


00 


2 


BCL 2 


02 


24 


02 


3 


X 


03 




61 


4 


r 


04 


14 


02 


5 


ENTER1 


05 




31 


6 


ENTER+ 


06 




31 


7 


RCL 3 


07 


24 


03 


8 


X 


06 




61 


9 


1 


09 




01 


10 


. 


10 




73 


11 


6 


11 




06 


12 


X 


12 




61 


13 


RCL 2 


13 


24 


02 


14 


1 


14 




01 


15 


* 


15 




73 


16 


2 


16 




02 


17 


X 


17 




61 


16 


- 


16 




41 


19 


RCL 4 


19 


24 


04 


20 


( 


20 




71 


21 


1 


21 




01 


22 


+ 


22 




51 


23 


->■ 


23 




21 


24 


RCL 1 


24 


24 


01 


25 


X 


25 




61 


26 


X 


26 




61 


27 


RCL 7 


27 


24 


07 


28 


X 


28 




61 


29 


STOP' 


29 




74 


30 


RCL 6 


30 


24 


06 


31 


X 


31 




61 


32 


2 


32 




02 


33 


X 


33 




61 


34 


BCL 7 


34 


24 


07 


35 


RCL 2 


35 


24 


02 


36 


X 


36 




61 


37 


* 


37 




71 


36 


1 


38 




01 


39 


+ 


39 




51 


40 


RCL 5 


40 


24 


05 


41 


X 


41 




61 


42 


STOP 


42 




74 


43 


RCL 


43 


24 


00 


44 


t- 


44 




71 


45 


sVop 


45 




74 


46 


RCL 


46 


24 


00 


47 


X 


47 




61 


48 


STO 


46 


23 


00 


49 


f CL X 


49 


14 


34 

■ 



l-'duardo Poijas Leilau ■* Kngenheirn Melaliir- 
gicii rormadci pela Kacuidade Mackenzie, de 
Sao Paulo. i'Ae (rabaiha na I sina da \ illares 
Indiistria de Base S.A., em Ptndamonhangaba, 
SSo Paulo. 
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Inform atic a 

em Recife : 

V Congresso 







V Congresso Regional cfe Informdtica. realiza- 

do entre 8g 15de maio no Ceniro de Conven- 
C&es de Pernambuco- significou, n^s paJavras 
de seu Presidenie Anur Edson Dias Pererra, uma 
"possibilidade de prover a regiSo de informacQes. a 
nfvei local, sem os custos pesadosquase lem quando 
ocorre um Congresso em outrosesTadOs. bem como a 
oportunidade de reunir interessados. empreyfios e 
fornecedores de equipamentos numa regiSo c^m po 
tertctat para agir como um pito de Inform^tica". 

A discuss§0 dessas qyestQes. enire elas urna particr- 
paclo mais efeitva do Nordeste no seior de Inform^ti^ 
ca. ioi apreseniada em palesira reali^ada no dia 10, e 
dividida com muiio poucos ouvintes. Ao que parece, 
publico se interessou bem maJs pelas palesiras Tu- 
nicas do que pelas discuss5es pol iticas. 

Contudo. entre propostas de se fabricar micro- 
CO mpu tad ores em Pernambuco s cn'ticas aos servi<;o5 
de assistancia tfcnica dos fabricantes, um aspecio pa^ 
reda consenajsl- "0 usu^rio de rnicrocomputadorem 
nossa regiao nSo ^ bem atendJdo" 

AFEIRA 

Talvei por sentirem esta negligencia. denundada 
em relapSo ao atendimento dispensado ^ regiSo, as 
empresas de fabricac^fo de equipamentos e software 
tenham se esforgado ao mdximo para airair os visi- 
lantes da II Feira Nacional de Informatica, queocor- 
reu paralelamente ao Congresso, 

Apesar das grandes vedeies continuatem sendo os 
jogos, OS expositores procuraram asar a criatividade. 
uma ve? que o apelo dos lan^amentos n3o existiu nu- 
ma exposip^o espremjda entre o passado Micro Fes- 
tival iSSo Paufo, margo, Veja MS n9 )9) e o fuluro 
Congresso NacionaJ de Informaiica, [S3o Paolo, ou- 
tubro proximo). Mas palavras de um Gerente de Mar- 
keting presente. "sSo muiias feiras para poucas no- 
vidades*'. 

A solu^o, cara e simp^tica. da trautec foi distri- 
buir pas bolsas vendidas aos congress is i as um quebra- 
cabe^a Assim. q indivWuo viu-se for^do a recorr^f 
inumeras vezes ^ foto do 1-7000, j^ tendo, ao final da 
"brincadeira'\ praticamenie decorado todos os con- 
lomos do microcomputador 

Mo seu esiande, contudo, a empresa prefer iu n3o 
brincar em service, e apresentou dois softs de apfica- 
g5o comercial, os Qnicosque ]A gst3o dlspomVeis para 
O I-70O0 editor de lextose um financeiro. 

A Pofymax foi outra que prefertu a sobriedade, e 
apreseniou seus produtos e m pen h ados em aplicaqSes 
profissionais, inclusive o Maxxi ^pessoal). as voltas 
com a contabitidadede uma empresa hipot^tica. 




A pteot:upa^o de Adson Csrvstho, Presidenro ds Suc^V'PE. 
antidada tjue orgent/bu o evento, rf que o V Congresso Refffo- 
nai tenha ajudado a desmistifipar a Mormiucs. cu/j "iin^ja- 
gem dfftcif. muitas pe^saas. ^rrf de dentro de Coverno, nSo 
etiwndem". 



Ji a famfiia Pro/dgtca aderiu aos jogos. A empresa, 
em estande dividido com a Prodasa — software-house 
e revendedora de equipamentos da Prci!6gica — pro- 
porcionava A garotada as emot^Ses de "Ataqu^ de 
Hobos". Isio se explica em relacSoaos computadores 
pessoais. Mas uma maquina do porta do S7CX) nSo 
tern, como fur^cao primeira. divertir... e for isto, eic- 
clustvamenie, que ele fei^ ao menos durante a tarde 
de lerga-feira. E isio apesar do representante da Pro- 
dasa ter-no5 descrito dJversos sistemas desenvolvidos 
peEa empresa, inclusive um imefessante pacote para a 
5rea m6dica. Mas,segundo o Gerente Regional da Pro- 
Idgica, Lui^ Siqueira, "a Feira visa distrair opiibhco, 
e quando a pessoa se interessa por uma apiicai?3o es' 
pecffica, nbsmostramos" 

A Scopus, aproveitando-se do fatode esiarem vras 
de dbrir mais uma filial t^cnica na regrao, procurav^ 
sedu^ir pi^blico com uma producSoem s^riedo tipo 
"o que aconteceu no dia de seu nascimento". Assim, 
dando mes e ano de seu nascimento. o visitar^^e era 
informado dos destaques jornali'sticos ou fatos da 
H)st6ri3 do Brasil naquela ^poca. 

A SfD exibia sua jd conhectda famHia 3000. de mi- 
crocomputadores, e apresentava como novidade um 
sisiema de aplicacao para revendedores de bebidas. 

Do mesmo modo, a Sisca apresentou seu super- 
micro MB 8000/SM, j^ conheddo. e l3ni;ava um sis- 
tema, desenvolvido por uma software-house pernam- 
bucana, que lA estd sendo utilizado em cart6rios de 
protesto de Recife e Maceib. 
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O esiande das fo/as aram ds msis procur^dos, pe!a vanedade de 
logos 9 equipamsntos. 

Aderindo ao apelo dos jogos, tamb^m a Cobra em 
seu micro C-305 atacava de "Bataiha EspaciaJ". Con- 
tudo, outro C-305 controlava uma mini-agencia ban- 
c^ria, na demonstrat;:§o do STF, Sistema de Termi- 
nais Financeiros. 

A empresa demonstrava ainda uma nova aplicat^o 
de seu mtcro no processo que envolve pesar e calcular 
valor de partidas de cana-de'ai;:ucar atrav^s da deter- 
nrHnapIo do teor de sacarose por amostragem. 

AS LOJAS 

Tris grandes lojas da regi^o expuseram equipamen- 
tos, acess6ri05, revistas e livros. Pouca novidade em 
termos.de softv/are. cuntudo. Dominavam em seus es- 
tandes os jogos sum tipo de letreiro quesempreexis- 
te nessas ocasi&es e que resume^e a dar nome e ends- 
re^o da empresa. 

As lojas sSo um bom termometro para medir a for- 
pa com que a Informatics vem enirando na vida das 
concentragoes urbanas do Nordeste, notadamente Re- 
cife e Salvador. Seus esTandes eram os mais chetos. pe- 
la variedade de jogos que apresentavam e tambem 
porque certos computadores pessoais, como o AP W, 
OGT-100. Microengenho, TRS-SO Modelo IV (ex- 
Fenix} e Schumec si podiam ser encontrados nesses 
espa^os. 

A Mova Era^ inaugurada em maio, apresentava o 
Dactari, o TK-86 trabalhando num orcamento domfe- 
tico e o TKnB2C que, juntamente com o JR da Sys- 
data, ofereciam partidas de xadrez aos curiosos. 

J^ no estande da Oficcina quem divertia os enxa- 
dristas era o AP II. O CP-500 revezava-se entre aten- 
der OS curtosos que nele quenam jogar eexibir os da- 
dos da toja, enquanto q DGT-100 utilizava-se do sin- 
tetizador de voz para se apresentar, com carregado 
"sotaque". ao publico. 

A Oficcina, que em esquema de franquia tamb^m 
existe em Salvador, ^ dirigida por mulheres (quatro 
diretoras em Recife e dues em Saivador} e n3o possui 
equipe propria para desenvolvimeniode software, co- 
mercializando produtos da Monk e da Microsoft. 

A E[6gica foi desenvotvida a parti r da software- 
house Elo e demonstrava am seu estande os CPs 200 e 
500 e o S-700. A empresa n§o S revendedora exc I us iva 
da Prol6grca e comercializatamb^m equipamentos da 
Brascom, Scopus e Schumec, Possui equipe pr6pria 
para assistencia t^cnica, ■ 

r^xm.' AidB Campos 
fotos:M. RvsBnfeid 
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Aplicativos total mertte em portugu§s 
para microcomputodores compatfvais 
com APPLE* : 

• MtCROCALCULO - or^amentoH, projsp'&eB 

• EDITEX ■ procesaodor de toxtos 

• MJCFtQDATA - banco de dados intes'^Bdo 

• QHAFi-SEHIE grAficos 
' MLOGO - ldr>guag«m 

■ COPIARTE - sdsteme do cir^n^ 

E prTiuitOs OutrOs. 

Qarantia # essistfenclB totat, 

M/Cft&ABTE SOFTWARE S/C I TDA 

Rub Coronel MoKo de Oliweira, V 63 

Tal.: (01 11 263-6286 
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O In&iituto Brasileirode Adminiscrai^o 

Municipal aLrav6s do seu 

Programa de "Recursos" e desenvolvimenio, 

em convSnio com o Cespro promoveri 

a partir do m^s de Junho, os seguinies 

cursos na ^rea de Micro Informitica: 



tNTkODU^AOAOS 
MICKOCOMPIJ TADORES 



K 



LINCUAGEM BASIC 



Todos OS curias terilo aulas pr^ticas 
com micrixompu! adores 



Infurma^des e Inscrivdes: 



JBAM - Rua Visconde Sllva. 157 HumaltS ■ RJ 

Te!.: 266 6622 ■ Ramais 251 © 252 

Das 9:00 hs.^ 21:00 h&. 



Garantindo o bom atendimento da matriz, em Sao Paulo, a Microshop em 
menos de urn ano ji esti abrindo sua terceira loja. 



Microshop: 

pronta 

entrega e 

orientagao 
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naugurada ha menos de urn 
ano em Sao Paulo, a Mi- 
croshop acaba de abrir 
uma fi iai em Belo Horizonte e at6 
final de junho estd prevista a 
inaugura^ao de outra loja, em Re- 
cife. E OS s6cios da empresa \i tern 
pianos para num futuro pr6ximo 
ampliar a rede, abrindo fillais em 
Brasi'lia, Porto Alegre, Curitiba, 
Rio de Janeiro e outra em Sao 
Paulo. 

Para Abi Petzenbaum, um dos 
diretores, este sucesso deve ser 
atribui'do ao tipo deservipo ofere- 
cido ao cliente: "Nosso neg6cio 
nao e apenas vender a m^quina, 
mas servir bem ao publico, orien- 
tando aqueles que nos procuram, 
procurando resolver seus proble- 
mas". Ele esclarece que "nao 
adianta divulgar os equipamentos 
que estao disponiVeis no merca- 
do se a pessoa que vai comprar a 
maquina nao sabe o que fazer com 
ela". Para fornecer este tipo de 
orientapao, a Microshop dispoede 
praticamente todos os microcom- 
putadores existentes no mercado 
hoje, pessoal treinado e cursos que 
abordam desde a ir>trodugao ao 
micro at6 as linguagens utilizadas 
e as aplicapoes possfveis. 

Como seus cursos vem tendo 
grande procura, os s6cios da Mi- 
croshop abriram uma nova firma, 
a Multisoft, que cuida especifica- 
mente da organiza(;:ao dos cursos. 
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Servir bem ao publico: o lema que est^ 
promovendo a formafao da cadeia de 
lojas Microshop. 



al6m de oferecer consultoria e 
grande variedade de software por 
encomenda. Os cursos sao minis- 
trades na pr6pria loja ou em fir- 
mas que solicitem os servigos da 
Multisoft, que funciona no andar 
superior da matriz, em Sao Paulo. 

VARIEDADE DE 
EQUIPAMENTOS 

Na Microshop podem ser encon- 
trados os equipamentos da Uni- 
tron, Polymax, Digitus, Spectrum, 
Microdigital, Sysdata, DIsmac, 
Prol6gIca e, atd o final de junho, 
ser^ comerclalizado tambdm o mi- 
cro da Itautec. Todos os equipa- 
mentos tern garantia total de um 
ano, dada pela pr6pria loja, e a 
assistencia t^cnlca e manuten(pao 
sao feitas pela Servcomp, contra- 
tada pela Microshop. 

Tamb^m estao disponiVeis im- 
pressoras da Elgin, Elebra e, re- 
centemente, a impressora ISA, da 
Burroughs. A ISA trabaiha a 90 
CPS, pode ser ligada a qualquer 



micro que tenha sai'da RS232C 
e seu preQO d Cr$ 870 mil. 

Para os micros que nao possuem 
vi'deo pr6prio, a loja oferece toda 
a linha de monitores da Instrum e 
da CMA, al^m de modems desta 
ultima empresa e da Coencisa. 

Com relapao a suprimentos, o 
usu^rlo encontra na Microshop 
desde fusi'veis at^ formul^rios e 
disquetes. E como a loja mantem 
sempre em estoque grande quanti- 
dade de equipamentos, garante um 
atendimento com pronta entrega. 

PROGRAM AS E 

DESENVOLVIMENTO DE 

HARDWARE 

Al^m da comercializagao de 
programas de varias software hou- 
ses, a Microshop tambem oferece 
pacotes para aplicagao em Open e 
Commodities, e um pacote Comer- 
cial Completo, que inclui controle 
de estoque, faturamento e conta- 
bilidade. 

Nao se llmitando a venda e Im- 
plantapao dos equipamentos, os 
tecnicos da Microshop desenvolve- 
ram uma Interface para ligapao de 
micros da linha Apple a computa- 
dores de grande porte. Estas inter- 
faces ja foram Instaladas na f^- 
brica Elgin, conectando um equl- 
pamento Labo a oito micros AP 
II, da Unitron, que passaram a 
funcionar como terminals inteli- 
gentes, e no Citybank, onde fol 
ligadoum AP II aum IBM 4341. 

A matriz da Microshop flea na 
Alameda Lorena, 652, Jardim Pau- 
lista, Sao Paulo, telefones (Oil) 
282-2105 e 852-5603, e em Belo 
Horizonte seu enderepo ^ Rua Pa- 
dre Odorico, 128, Savassi, telefo- 
ne (031) 225-6519. ■ 



Texto: Stela Lachtermacher 
Foto: Nelson Jumo 
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Para que futuro \oc§ esta 
educando seu filho? 




Os dois usam computadon 

"A 



i Ali'JJi TC|ffilff| 
O CP 200 da ?Td6qka e simf)H di' o^vftiT 
i'usfcj menis^ tb cfut' um U' a a>r{^ c fee 

importantes frahif^cs tic mlet^$^ sk lain a 
fffmUm Com eie vae f m-ui fife iipretwl^m a 

i^&k{ikeT (Iff* da irom,pu.rffifcr parric ijMttti? <■ 
i(ior\do fflOffltvU4i (i^UflJ <TUe' )a r ihm^^ dt 
acra da uifOTtndiiai" 

Basta li^ar o CP 200 ci urtf iek'vrsor e a um 
^tgvtidm pstm wxi' icf um ^ompu^tidor 
cffmpkltf cm urn iiHA 
A^stffl am(f ntraio dc ftwuri' o 
H^idificiiitr c durn q nuU^miwi. a im^mii 
df esirevi'i e a iahtladanf l' CP 200 wl 
i\m^\tti:0 sua vida. 



Cfiar^m am futuro rwJ/ior 




V^ efut* vod Isi wm o CP 200' 

• f<prmdha^ em UnqiAaqem ELasif 

• Cot\\roie de ionlit bannjim 

• Autis d^ malemdUia i fisita 

SOLICITE DEMONSTRACAO NOS 
PRINCIPAIS MAGAZINES. 



PROLX)GICA 

microcom potadores 
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K%A^ 



M^ 
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» L'nguagdm SASiC 

• lOKblfieiOQ ROM. 

• Ifidu^fi Ktiytesds rn«m[Sr<A 
RAM. 

" Grava^Aa dg ipraQramm om 
litAcaasfrEecomum. 

• infiui 9 Ouipui avcJKiaa, 

■ VJdEo. ap«rekfMj5 d^ TV OiiP 
ou CDlorido. 

• FurTcM5e9{>«ci4ii 
HJGH-SPEEO. 

• S&rn 0[>CjCinal. 

Pre^g dq lan^Hmenlq. 
Crt179J50.00(16K) 
CrS 249.850.00 (4flK) 
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